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Build Applications 
As Fast As You Can 
Visualize Them 


Yes, visualize them. No ifs, ands 


or C++. | 


There's real magic in Prograph CPX's 
pictorial programming environment. 
Not just another pretty interface, its | 
visual magic includes the actual 


down and dirty of programming 





itself. What's the payoff? Maximum | 
productivity. 


Prograph CPX is the award- 


winning OOP tool of choice for 
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multimedia authoring and all your | 


client/server solutions, sophisticated 


development needs. And 


you wont have to charm 






rte pases 
» n€ R, Pid 
= fete oe 
(ca arsed Pay fessione 


any snakes to deliver 


sppiicel? as 






killer applications in less 


time and with less money. | 





Test drive Prograph 
absolutely free and | 


experience why it's the 
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Maximum flexibility. 
And the ride of your life. 


#1 rapid application | 


development tool. 


Just call 800.927.4847. | 


Ask for your magic CD-ROM ride. 
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P.O. Box 2206, San Francisco, CA 94126-2206 
Internet: info@prograph.com AOL: PrographUS 
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Now, create 68K and Power Macintosh 
applications faster than ever before. VIP-C’s 
visual design, its application building aids, and 
its ability to let you modify your program code 
and interface with immediate feedback, give you 
areal programming edge. Read further to see 
why, with VIP-C, time really is on your side... 

| Complete Development System — 

_ Now develop with just one comprehensive 
system. VIP-C integrates all the tools you need 
‘to create stand-alone 68K and Power Macintosh 
applications—tight out of the box! Develop 
applications in a standard language using this 
intelligent, full-featured Rapid Application 
Development (RAD) environment. No more 
moving from tool to tool. No more dependence 
on non-standard languages. 


For All Levels of Programmers 
: VIP-C offers multiple levels of support to 
| best fit your abilities. If you just want to type C 
code into its editor, you can—and VIP-C will 
~ automatically check the syntax and create a 

» flowchart of your code. For higher-level support, 
VIP-C features prewritten intelligent prototypes 
of all the Mac Toolbox calls, high-level VIP-C 
Functions that simplify low-level Toolbox calls, 
Resource Editors that let you visually design and 
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create your windows, menus, dialogs, buttons, 
etc., and even a VIP-C Dispatcher to provide 


in one complete development environment. 


_ User Interface Generation Tools 

The VIP-C Dispatcher simplifies program 
development by automating the main event 
loop. It acts as a central controller to manage 
program events by distributing tasks to different 
routines. User interface items—menus, dialogs, 
buttons, etc.—are created with integrated 
resource editors that automatically link user 
action to your code. 


VIP-C 1.5 


Everything you need to 
create complete Macintosh and 
Power Macintosh applications 

in one box. 


Powerful Prewritten Functions 

Functions for the most frequently used 
features of the Mac interface have been 
prewritten and stored in a palette for instant 
use. oe the click of a mouse you can lighten 


and coding time by several orders of magnitude. 


On-Line Macintosh Toolbox Calls 
VIP-C accesses the complete Mac Toolbox. 
Search and display prototypes for any function, 
structure, or macro. No more rooting through 
multiple volumes of Inside Macintosh! 


Attention Database Developers! 

VIP-C users now have the power to create 
commercial quality, multi-user, relational — 
databases using the new VIP Database Manager 
(sold separately). VIP Database Manager has the 
built-in functionality of the CXBase Pro 
database engine (recently chosen by Apple OSA 
for creating the eWorld content publishing | 


software) giving you an inexpensive way to 
create professional databases, royalty-free! 


Compiler Hotlink | 
If you have a favorite compiler, use it! 
Compile and run your application directly hen a 
menu item in the VIP-C editor. VIP-C supports: 


THINK C, MPW- C, and CodeWarrior (each 
sold separately). 


s 


€ 
Accelerated for 
Power Macintosh 


Bas VIP-C now for a Limned. 
Time Special Price of only $295. 
_ Act now and get VIP Database 

Manager for only $149. 
VIP-C’s suggested retail price is $495. But 
from now until March 1, 1995, you c can order 


at rue Pie i | ates 


591-A Constitution Ave. 
— B-1040 Brussels Belgium 


Camarillo, CA 93012 
fox: (805) 484-9428 
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By Scott T Boyd, Editor 





The Editor’s Viewpoint 





LEARNING FROM OTHERS’ MISTAKES 


If the world didn’t know about Intel’s Pentium processor before, 
they sure do now. Intel spent millions last year flying their logo 
around TV sets to establish their brand image. If only they’d 
known how much cheaper it would be to have Andrew Grove, 
Intel President and CEO, apologize on the Internet. Never mind 
that many on the net took offense that Intel would choose 
when and whether to replace a customer's chip. Intel not only 
seemed reluctant to own up to their problem (they did, after all, 
wait several months until someone else discovered it 
independently, to mention it), but much of what they said 
sounded more like they were upset that they got caught. 

Those of us Macintosh supporters smugly rubbing our 
hands together with glee and thinking, “Goody, goody! Intel’s in 
trouble,” may have another thing coming. Intel hurt their 
reputation, right? Was it just my imagination, or was that a full- 
length Pentium ad shown on MacNeil/Lehrer, Night Line, and 
every other major news program? Will the market remember 
Intel’s mistake? Or will they remember over a full week of 
coverage? Will they remember the names Intel and Pentium? 
and that Intel eventually took care of their customers? Even 
with a chargeback of tens of millions of dollars to pay for the 
chip replacements, Intel may have scored an advertising coup 
like we've never seen before. 


FOR THE MORBIDLY CURIOUS 

After reading Intel’s white paper (http://www. intel.com), IBM’s 
position paper (http://www.ibm.com), and Intel’s rebuttal to IBM’s 
paper, there seems to be no disagreement about the source of 
the bug (missing entries in a lookup table caused by a flawed 
script written to download entries into a hardware PLA 
(Programmable Lookup Array)). They also seem to agree about 
the worst-case impact on any single operation (inaccuracies can 
occur starting with the 4th significant decimal digit). 

How politics affected the presentation of the data shows in 
the assumptions each party made. Intel assumed that the 
average spreadsheet user about 1000 floating point divides on 
any given day, and that numbers are uniformly distributed. 
They also used spreadsheets from all around Intel to determine 
the probability of occurrence for bad number combinations. 

IBM, on the other hand, figured that the average 
spreadsheet user would spend about 15 minutes a day 
recalculating, and would get one divide per 16,000 instructions 
when recalculating. At 90MHz, that’s about 4687 
divides/second, or 4.2M per day. They also assert that all bit 
patterns are not equally probable. They created random 
numbers in a variety of common decimal patterns, and used 
them to create numerators and denominators. Their 
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observations led them to believe that one out of every 100 
million divisions might lead to bad results. 

Intel says one error every 27,000 years. IBM says every 24 
days. Do you hear the axes grinding? Bottom line? Intel takes a 
$35M-$70M charge against earnings to give customers what they 
want (and now they know what's inside and that they want one). 


| HUNGRY AND SLEEPY? 

I recently got a Connectix QuickCam (the $99 all-seeing eyeball 
that plugs into a Mac’s serial port). I plugged it in, installed 
some software, and all of a sudden my modem was a problem. 
Not that there’s anything technically wrong with the modem or 
their software — perhaps I should back up and explain a bit. 

The camera works with pretty much any QuickTime 
software. One particularly interesting application is CU-SeeMe, 
a free application from Cornell University which supports real- 
time multi-party videoconferencing on the Internet. Even a 14.4 
connection will get you video, but it'll leave you hungry for 
more — much more bandwidth, that is. Four of us in three 
different parts of the country got online with three different 
cameras and a VCR. Even though we didn’t do much more 
than watch each other smile at the camera, we had so much fun 
that we were all wondering how to beg, borrow, or steal more 
bandwidth (know any internet providers who want to trade 
Macintosh code for a frame relay connection?). We don’t know 
whether it will help our virtual businesses (it sure didn’t help 
our sleep patterns), but we have little doubt that 
videoconferencing will one day look no more surprising in a 
home office than a copier, fax machine, or a Macintosh. 


QUOTABLE 
“We're certainly not going to replace your Pentium chip just so 
you can play Doom!” — Intel Pentium hotline staffer 


“Maybe you ought to consider a Macintosh this Christmas.” 
— Wall Street Journal 15 Dec 1994 


“I suppose it is the corrected chip that will be called 
RePentium.” — Peter G. Neumann 


“Intel — changing the way people think about floating point.” 
— excerpt from a speech, originally intended as a compliment, 
as reported by Jorg Brown 


FoopD For THOUGHT 
Right in the middle of a MacNeil/Lehrer News Hour montage of 
Pentium clips, I saw Apple’s Graphing Calculator spinning a 3D 
parabolic equation. They didn’t realize they were showing 
Apple’s Power Macintosh, not a Pentium box. Do you think 
they might have been able to see the bugs had it really been 
running on a Pentium? ms 
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Bringing software into the world is a little 
like bringing up children. You always know 
where they start, but you seldom know 
where they’ll end up. These days, with 
illegal use of software so common, 
concerned developers have good reason to 
worry about the products of their labor. 
That’s where MacHASP comes in. 





Like a responsible babysitter, MacHASP 
accompanies your software wherever it goes. 
With MacHASP there, your software won’t 
run out of control. Without MacHASP, in 
fact, your software won’t run at all. 


For developers, MacHASP provides the 
highest level of security and reliability. 

For legitimate users, MacHASP is a friendly 
and transparent solution. Once connected, 
they won’t even feel it’s there. 


And if your child wants to play with 

its friends, a single Net-MacHASP lets it 
run free around a local area network. But 
always under your supervision and control. 


Get serious about software 
protection. Since 1984, nearly one 
million HASP keys have enabled thousands 
of PC & Mac software developers, in more 
than 60 countries, to protect their software. 
To find out why MacHASP is considered the 
best product in the market, order your 
MacHASP Developer’s Kit today. 


-800-223-4277 


wav) 8) 


The Professional's Choice 


North Aladdin Software Security Inc. 
America Tel: (800) 223 4277, 212-564 5678 
Fax: 212-564 3377 
E-mail: sales@hasp.com 


Intl Office Aladdin Knowledge Systems Ltd. 
Tel: 972-3-537 5795, Fax: 972-3-537 5796 
AppleLink: ALADDIN.KNOW 
E-mail: aladdin @aladdin.co.il 


United Aladdin Knowledge 
Kingdom Systems UK Ltd. 
Tel: 0753-622266, Fax: 0753-622262 


France Aladdin France SA 
Tel: 1 40 85 98 85, Fax: 1 41 21 90 56 





© Aladdin Knowledge Systems Ltd. 1985-1994 (12.94) PowerPC is a trademark of Motorola. Macintosh is a trademark of Apple Inc. 
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CodeWarrior 





CodeWarrior 





New Features! 


*MPW tools included for both the 68k and Power PC 
«C++ Templates supported in the compilers 





Power Mac-hosted Power Mac IDE: 
Power Mac-hosted C/C++ generating PPC code 
Power Mac-hosted Pascal generating PPC code 

Power Mac-hosted 68K Mac IDE: 

Power Mac-hosted C/C++ generating 68K code 

Power Mac-hosted Pascal generating 68K code 
68K Mac-hosted Power Mac IDE: 

68K Mac-hosted C/C++ generating PPC code 

68K Mac-hosted Pascal generating PPC code 
68K Mac-hosted 68K Mac IDE: 

68K Mac-hosted Pascal generating 68K code 

68K Mac-hosted C/C++ generating 68K code 

MPW Tools: 

Power Mac-hosted C/C++ generating PPC code 
Power Mac-hosted C/C++ generating 68K code 
68K Mac-hosted C/C++ generating PPC code 
68K Mac-hosted C/C++ generating 68K code 

PowerPlant Application Framework 


PowerPlant Shared Library for Power Mac 


Source-level debugger for Power Mac 
Source-level debugger for 68K Mac 
Constructor Visual Interface Editor 
Selected Apple Developer Tools 
30-day money-back guarantee 


3,000 pages of On-line Documentation and 


much, much more. 


Twelve Compilers! 
CodeWarrior Gold includes twelve compilers and CodeWarrior Bronze includes four compilers. 
With our Power Mac-hosted 68K cross compilers, you can build both 68K and Power Mac apps 
on the Power Mac. Conversely, with our 68K Mac-hosted Power PC cross compilers 








you can build 68K and Power Mac apps on a 68K Mac. 
Note: CodeWarrior compilers are shipped as fat binaries! 


Native IDEs! 

The CodeWarrior integrated development environment (IDE) 

is native on both the 68K Mac and Power Mac. The same 
easy-to-use environment is used to program in C, C++ and Pascal. 
Note: CodeWarrior IDEs are also fat binaries. 


Get To Market Faster! 

CodeWarrior compilers build your 68K and Power Mac apps at 
+200,000 lines/minute on a Power Mac 8100, with comparably 
high rates on less powerful Macs! : 
Two Free Updates! er 
CodeWarrior is updated 3 times a year on CD-ROM. Purchase either version 
of CodeWarrior and you are entitled to receive two future updates free of charge. 


¢Global optimization improved for the Power PC C/C++ compilers 
*Conditional breakpoints and expression evaluation added for the debugger 
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68K Mac 


Power Mac/68K Mac 


EXCELLENCE 
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By Dave Mark, MacTech Magazine Regular Contributing Author 


Part 1 —A Linked 
List Class 


Last month, we finally got into our new 
(and ever evolving) framework, 
Sprocket. In the next few columns, 
we're going to create a new set of 
classes designed to add functionality to 
Sprocket. This month, we'll create and 
test our new classes and next month 
we'll step through the process of adding 
the classes to Sprocket. 





A LINKED List CLAss 
Every framework needs some sort of 
linked list class. You might want to 
maintain a list of CDs or your favorite 
movies. You might be building some 
sort of network server that maintains a 
list of network service requests. 
Whatever your need, there are probably 
a million ways to design a linked list 
class that fits the bill. In some cases, 
you'll adopt a general approach, 
designing a set of classes intended for 
many different applications. In other 
cases, you'll have a specific functional or 
performance need and you'll design a 
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Adding Your Own Class to Sprocket 





class that might not be of much use to anyone else, but will 
solve your problem. 

Dave Falkenburg (Sprocket’s daddy) and I were chatting a 
few weeks ago about some of the features Dave envisioned for 
Sprocket’s future. One of these features centered around a 
method for keeping track of your application’s documents. As 
an example, when the user quits your application, you need to 
step through each of your open documents, calling each 
document’s close method. Some applications solve this problem 
by stepping through the window list maintained by the system 
for every open application. Besides the technical mumbo-jumbo 
you have to go through to maintain compatibility with older 
versions of the MacOS, there are two basic problems with this 
approach. Some of your windows may not be associated with a 
document, and some of your documents may require more than 
a single window. 

The linked list classes we’re going to explore this month 
were designed specifically to maintain a list of document object 
pointers. As you'll see, I tried to generalize the linked list classes 
so that you could use them to store pointers to any objects you 
like, but the member functions (aka, methods) were designed 
with document management in mind. We'll get into the specifics 
of maintaining a list of document object pointers next month 
when we add the classes to Sprocket. This month we're going 
to enter the classes, then take them for a test drive. 


| THE List TESTER PROJECT 

This month’s source code was tested using both CodeWarrior 
and Symantec C++. Pick your favorite compiler and build a new 
iostream-based project. Figure 1 shows my CodeWarrior 
project window. Be sure you add the three libraries shown. If 
you intend on generating PowerPC code, you'll need to swap 
the two 68K-specific libraries for those appropriate to the 
PowerPC. 

Figure 2 shows the Symantec C++ version of the ListTester 
project window. If you are using Symantec C++, be sure to add 
the three libraries CPlusLib, ANSI++, and I10Streams to 
your project. You can have this done automatically by selecting 
“C++ IoStreams Project” from the list of project types that 
appear when you select New Project from the THINK Project 
Manager’s File menu. 


ADDING YOUR OWN CLASS TO SPROCKET 





[fie Ss fode Data | 


~ Segment 1 


LinkedList.cp 

main .cp ¢ 1082: 112: 
Se a : 

ANSI (41) C++_6SK_Lib 

ANSI (41) C.68K_Lib 


CPlusPlus.lib 


83046) 2950) 
| 44736) 10003: 


6 file(s) 





wv Segment 2 
CPlusLib 
Link .cp 
LinkedList.cp 
ERT eR a susansnesenefeeneeeen es, 

Sd Segment 3 

_ hl A RO ico 


vy Segment 4 
lOStreams 


i 













Figure 2. The Symantec C++ version of the ListTester project. 


As you can see from the two figures, you'll be adding 3 source 
code files to the project. In addition, you’ll be creating 2 
additional include files, bringing the grand total to 5. The next 
five sections contain the source code for each of these five files. 
Type in the code (assuming you haven't already downloaded 
it), save it under the appropriate file name, and add each of the 


3 “.cp” files to the project. 


MAIN.CP 
include <iostream.h> 
include "LinkedList.h" 
void CountAndDisplayLinks( TLinkedList *listPtr ); 
int main() 
f 
l 
TLinkedList *ListPtr: 
char "string; 
char *sl = "Frank Zappa", 
*s2 = "Violent Femmes", 
*s3 = "Jane Siberry"; 
listPtr = new TLinkedList; 


listPtr->CreateAndAddLink( s1 ); 
listPtr->CreateAndAddLink( s2 ); 
listPtr->CreateAndAddLink( s3 ): 
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CountAndDisplayLinks( listPtr ); 


string = (char *)listPtr->GetNthLinkObject( 2UL ); 


listPtr->FindAndDeleteLink( string ); 
CountAndDisplayLinks( listPtr ); 


réturn 0: 











_ CountAndDisplayLinks 


void CountAndDisplayLinks( TLinkedList *listPtr ) 


unsigned long counter, numLinks; 
char “Strains ) 

numLinks = listPtr->CountLinks () ; 
cout << "This list has "; 


cout << numLinks; 
cout << " links...\n": 





for ( counter = 1: counter <= numLinks: countert+ ) 


{ 
cout << "Link #" << counter << ": 


". 
’ 

















string = (char *)listPtr->GetNthLinkObject( counter 
} 
cout <S. strang << "in": 
| 
J 
} 
LINKEDLIST.H 
ifndef _LINKEDLIST_ 
#fdefine _LINKEDLIST_ 
iFifndef _LINK_ 
#include "Link .h" 
#fendif 
const OSErr kLinkedList_LinkNotFoundErr = -2 
const OSErr kLinkedList_CouldNotDeleteLinkErr = -3 
Oo ; class TLinkedList 
class TLinkedList 
public: 
TLinkedList () ; 
virtual ~TLinkedList(); 
virtual OSErr CreateAndAddLink(void *objectPtr) ; 
virtual OSErr FindAndDeleteLink(void *objectPtr) ; 
virtual unsigned long CountLinks(); 
virtual void *GetNthLinkObject (unsigned long linkIndex) ; 
protected: 
virtual void DeleteAllLinks() ; 
TLink *FindLink( void *objectPtr ); 
virtual OSErr DeleteLink( TLink *linkPtr ); 


TLink *fPi¢stLinkPtr: 
TLink *TLAasthbinkPtr : 
#endif 
LINKEDLIST.CP 


ThinkedList?:TLinkedList () 
{ 


tRirstlLinkPtr = nil: 
fhastLinkPtr = nil: 
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: - : TLinkedList::DeleteAllLinks 
TLinkedList::~TLinkedList 





TLinkedList: :~TLinkedList () void TLinkedList: :DeleteAllLinks () 

DeleteAllLinks():; TLink *currentLinkPtr, *nextLinkPtr; 
} 

: TLinkedList::CreateAndAddLink currentLinkPtr = fFirstLinkPtr; 

OSErr TLinkedList::CreateAndAddLink( void *objectPtr ) while ( currentLinkPtr != nil ) 
{ { 

TLink *newLinkPtr;: nextLinkPtr = currentLinkPtr->GetNextLink(); 

delete currentLinkPtr; 
newLinkPtr = new TLink( objectPtr ); | currentLinkPtr = nextLinkPtr; 


if- ( newLinkPtr == nil ) 
return kLink BadLinkErr; fFirstLinkPtr = nil; 
fLastLink?Ptr = nails 

if ( fFirstLinkPtr == nil ) 
fFirstLinkPtr = newLinkPtr; 





TLinkedList::FindLink 
if ( fLastLinkPtr != nil ) TLink *TLinkedList::FindLink( void *objectPtr ) 





fLastLinkPtr->SetNextLink( newLinkPtr ); 
TLink ‘current LinkPtr: 
newLinkPtr->SetPrevLink( fLastLinkPtr ); 
newLinkPtr->SetNextLink( nil ); currentLinkPtr = fFirstLinkPtr; 
fLlastLinkPtr = newLinkPtr; while ( currentLinkPtr != nil ) 
{ 
return noErr; | if ( currentLinkPtr->GetObjectPtr() == objectPtr ) 


} return currentLinkPtr; 
TLinkedList::FindAndDeleteLink 


OSErr TLinkedList::FindAndDeleteLink( void *objectPtr ) } 


{ return nil; 
TLink *foundLinkPtr; } 





currentLinkPtr = currentLinkPtr->GetNextLink() ; 





foundLinkPtr = FindLink( objectPtr ); Tied ee iocut 


OSErr TLinkedList: :DeleteLink( TLink *linkPtr ) 
if ( foundLinkPtr == nil ) { 


return kLinkedList.LinkNotFoundErr; if ( linkPtr == nil ) 


else : return kLinkedList_CouldNotDeleteLinkErr; 
rettitn DeleteLink( foundLinkPtr }; 


} if ( linkPtr == fFirstLinkPtr ) 























aL akkediisi=Countlinks fFirstLinkPtr = linkPtr->GetNextLink(); 
. else 
unsigned long TLinkedList: :CountLinks () linkPtr->GetPrevLink() -> 
SetNextLink( linkPtr->GetNextLink() ); 
TLink *currentLinkPtr: 
unsigned long numLinks ; if ( JankPtr == fLastlinkPtr } 
fLastLinkPtr = linkPtr->GetPrevLink(); 
numLinks = 0; else 
currentLinkPtr = fFirstLinkPtr; linkPtr->GetNextLink() -> 
SetPrevLink( linkPtr->GetPrevLink() ); 
while ( currentLinkPtr != nil ) return noErr; 
{ } 
numLinkstt; 
currentLinkPtr = currentLinkPtr->GetNextLink(); 
LINK.H 
return numLinks; ifndef _LINK_ 
} ftdefine _LINK_ 
TLinkedList::GetNthLinkObject Wa tide, ines.) 
void *TLinkedList: :GetNthLinkObject( unsigned long 
linkIndex ) const short kLink_BadLinkErr = -1; 
{ class TLink 
TLink *currentLinkPtr; class TLink 
unsigned long numLinks, curLinkIndex; { 
public: 
numLinks = CountLinks(); TLink( void *objectPtr ); 
virtual ~TLink(); ‘ 
if ( (linkIndex <¢ 1) | (linkIndex > numLinks) ) virtual void SetPrevLink( TLink *prevLinkPtr ) 
return nil; { £PrevLinkPtr = prevLinkPtr; } 
virtual void SetNextLink( TLink *nextLinkPtr ) 
curLinkIndex = 0; { fNextLinkPtr = nextLinkPtr; } 
currentLinkPtr = fFirstLinkPtr; virtual TLink. *GetPrevLink() 
{ return fPPrevLinkPtr: | 
for (curLinkIndex=1; curLinkIndex<linkIndex; curLinkIndext+) virtual TLink *GetNextLink () . 
currentLinkPtr = currentLinkPtr->CGetNextLink(); { return fNextLinkPtr; } 
virtual void *GetObjectPtr() 
return currentLinkPtr->GetObjectPtr(); { return fObjectPtr; } 
} 
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a nr’ 


protected: 


TLink *FPrevLinkPtr: 
TLink *fNextLinkPtr; 
void *fObjectPtr; 
lee 
frendif 
LINK.CP 


finclude "Link.h" 





. aa 4 . TLink::TLink 
TLink::TLink( void *objectPtr ) 
{ 
fObjectPtr = objectPtr; 
fPrevl. inkPtr = nil: 
fNextLinkPtr = nil; 


TLink: *=TLank() 
{ 





RUNNING LINKTESTER 
Once all your code is typed in and the appropriate files are 
added to your project, you’re ready to go. When you run 
ListTester, an iostream console window will appear, showing 
the following output: 
This list has 3 links... 
Link #1: Frank Zappa 


Link #2: Violent Femmes 
Link #3: Jane Siberry 


This list has 2 links... 
Link #1: Frank Zappa 
Link #2: Jane Siberry 


Now let’s make some sense out of all this. 
LinkedList.h contains the declaration of a linked list class, 
namely TLinkedList. We'll start all our class names off with 
the letter T to stay compatible with Sprocket. It’s just a 
convention and doesn’t affect the code in any way. Pure 
semantics. LinkedList.cp contains the definitions of the 
TLinkedList member functions. 

A TLinkedList consists of a series of TLink objects, all 
linked together via pointers. A TLinkedList object is an entire 
linked list, while a TLink is a single link in the list. Link.h 
contains the declaration of the TLink class, and Link.cp 
contains the definitions of the TLink member functions. 















1 linked lists, take some - 
1 C on the Macintosh will 
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1 list mechanism, you'll 
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ListIester starts by creating a new TLinkedList object, 
then adds three new links to the list. The links contain three C 


10 | ADDING YOUR OWN CLASS TO SPROCKET 


text strings, but could easily handle a document object or any 
other block of data. Once we add the three links to the list, we 
call a routine that displays the contents of the list. 

Next, we call a member function to delete the second link 
in the list, then display the list again. That’s about it. Let’s take a 
look at the source code. 


MAIN.CP 
main.cp starts off by including <iostream.h>, which gives 
it access to cout and the rest of the iostream library. We 
also include LinkedList.h to give us access to the members 
of the TLinkedList class. 


fHinclude <iostream.h> 
include "LinkedList.h" 


CountAndDisplayLinks() walks through a linked list and 
displays the strings embedded in the list. 


void CountAndDisplayLinks( TLinkedList *listPtr ); 
main() starts off by creating a new TLinkedList object. Notice 
that the TLinkedList constructor doesn’t take any parameters. 


int main() 


TLinkedList *listPtr; 

char *string; 

char *sl = "Frank Zappa", 
*s2 = "Violent Femmes", 
*s3 = "Jane Siberry"; 


listPtr = new TLinkedList: 


Next, we call the CreateAndAddLink() member function to 
add our three text strings to the list. We then call 
CountAndDisplayLinks() to walk through the list and 
display the contents. 


t 
2 
~” 
ct 
rod 
ct 
a 
J 
(>) 
Kh 
(D 
m 
or 
a) 
Nee 
3 
jan 
> 
Qu. 
Qu. 
‘tt 
rare 
= 
sa 
cm” 
n 
f-4 
Seen Sei” 


List Ptr- Cert ne s2 
listPtr->CreateAndAddLink( s3 ); 


CountAndDisplayLinks( listPtr ); 


Next, we'll retrieve the second object in the list, so we can 
delete it by calling FindAndDeleteLink(). There are a few 
interesting things to note here. First, notice that we had to 
typecast the value returned by GetNthLinkObject() toa 
(char *). Each TLink features a data member which points to 
the data associated with that link: As you'll see, the TLink 
stores the data as a (void *). The advantage of this strategy is 
that it lets you store any type of data you like in the list. You 
can even mix data types in a single list. The catch is, you have 
to know what the data type is when you retrieve it. If you plan 
on mixing data types, you can start each data block off with a 
flag that tells you its type, or you can add a data member to the 
TLink class (or, better yet, to a class you derive from TLink) 
that specifies the type of data stored in a link. 

The second point of interest here is the fact that we 
deleted the data from the list using the data itself instead of 
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specifying its position in the list. In other words, we said, go 
find the string “Violent Femmes” and delete it, rather than, 
delete the 2nd item in the list. There are definitely pros and 
cons to this approach. Since these classes were defined to 


handle documents, this approach should work just fine. A more. 


sophisticated strategy might assign a serial number to each link, 
then delete the link by specifying its serial number. Since 
document object pointers will be unique, our approach should 
be OK. The true test will come down the road as we add more 
sophisticated document handling capabilities to Sprocket. 


string = (char *)listPtr->GetNthLinkObject( 2UL ); 
listPtr->FindAndDeleteLink( string ); 


Finally, we redisplay the list to verify the link’s deletion. 
CountAndDisplayLinks( listPtr ); 


return 0; 


CountAndDisplayLinks() is pretty straightforward. We first 
call CountLinks() to find out how many links are in the list, 
then loop through that many calls to GetNthLinkObject (). 
void CountAndDisplayLinks( TLinkedList *listPtr ) 

{ 


unsigned long counter, numLinks; 
char *string; 


numLinks = listPtr->CountLinks(); 


cout. << "This list. hae *: 
cout << numLinks;: 
cout << " links...\n": 


for ( counter = 1: counter <= numLinks; countertt ) 

{ 
cout << "Link #" << cotinter << ": "; 
string = (char *)listPtr->GetNthLinkObject( counter ); 
eout-<“. string << *\n"s 


LINKEDLIST.H 


LinkedList.h contains the declaration of the LinkedList 
class. As we did in our last C++ column, we start the .h file off 
with some code that prevents us from multiply declaring the 
class in case a .cp file includes this file and also includes 
another .h file that includes this file. 


ifndef _LINKEDLIST_ 
define _LINKEDLIST_ 
ifndef _LINK_ 
+tHinclude "Link..." 

FFendif 


These two constants are error codes returned by various 
TLinkedList member function. Though our little test 
program didn’t test for these errors, our Sprocket code 
definitely will. Until Sprocket supports true C++ exception 
handling, our error checking will consist of checking the return 
codes returned by member functions and bubbling the errors 
up to the routine that must deal with the error. 
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const OSErr kLinkedList_LinkNotFoundErr = -2; 
st OSErr kLinkedList_CouldNotDeleteLinkErr = -3; 


con 


a 
-Uss 


The TLinkedList class features a constructor, a 
destructor, and four public member functions. 
CreateAndAddLink() creates a new TLink, embeds the 
objectPtr in the link, then adds the link at the end of the 
list. FindAndDeleteLink() walks through the list till it finds 
a link containing a pointer that matches objectPtr. When the 
match is found, the link is deleted. CountLinks() returns the 
number of links in the list. GetNthLinkObject() walks 
down the list and returns the objectPtr embedded in the 
Nth link in the list. 

As we discussed in an earlier column, marking the 
destructor and other member functions as virtual allows the 
proper member function to be called when a new class is 
derived from this class and a base class pointer holds a pointer 
to the derived class. For more details, look up virtual 
destructors in your favorite C++ book. 


class TLinkedList 
{ 


public: 
TLinkedList () ; 
virtual ~TLinkedList () ; 
virtual OSErr CreateAndAddLink(void *objectPtr) ; 
virtual OSErr FindAndDeleteLink(void *objectPtr) ; 
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virtual unsigned long CountLinks() ; 
virtual void *GetNthLinkObject(unsigned long linkIndex) ; 


The protected members are not intended for public 
consumption. Instead, they are used internally by the linked list 
member functions. 


protected: 

virtual void DeleteAllLinks(); 
TLink *FindLink( void *objectPtr ); 
virtual OSErr DeleteLink( TLink *linkPtr ); 
TLink TTP Lret Linkter * 
Toink *TLastLainkPtr: 

‘a 

endif 

LINKEDLIST.CP 


Since the TLinkedList member functions work with both 
TLinkedList and TLink members, we need to include both 
h files. 


f#include "LinkedList.h" 
#include "Link.h" 


The TLinkedList constructor sets the pointers to the first and 
last links in the list to nil. By the way, nil is defined in 
<Types.h>. Also, note that all data members start with the 
letter f (again, just a convention). 
TLinkedList: :TLinkedList () 
{ 

fFirstLinkPtr = nil; 


fLastLinkPtr = nil; 
} 


The destructor deletes all the links in the list. 
TLinkedList::~TLinkedList () 
{ 


DeleteAllLinks(); 
} 


CreateAndAddLink() creates a new TLink, then uses the 
TLink member functions SetPrevLink() and 
SetNextLink() to connect the link into the linked list. Each 
link features a prev and a next pointer, pointing to the previous 
and next links in the list. These two pointers make our linked 
list a doubly-linked list. We won’t get into the advantages and 
disadvantages of doubly versus singly-linked lists here. Suffice 
it to say that we definitely could have solved our problem any 
number of ways. 

OSErr TLinkedList::CreateAndAddLink( void *objectPtr ) 


{ 
TLink *newLinkPtr; 


newLinkPtr = new TLink( objectPtr ); 


if ( newLinkPtr == nil ) 
return kLink_BadLinkErr; 


if ( fFirstLinkPtr == nil ) 
fFirstLinkPtr = newLinkPtr; 


if ( fLastLinkPtr != nil ) 
fLastLinkPtr->SetNextLink( newLinkPtr ); 
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newLinkPtr->SetPrevLink( fLastLinkPtr ); 
newLinkPtr->SetNextLink( nil ); 


fLastLinkPtr = newLinkPtr: 


return noErr; 


FindAndDeleteLink() calls FindLink() to find the link 
in the list, then deletes the link if it was found. 
OSErr TLinkedList::FindAndDeleteLink( void *objectPtr ) 


{ 
TLink *foundLinkPtr; 


foundLinkPtr = FindLink( objectPtr ); 


if ( foundLinkPtr == nil ) 
return kLinkedList_LinkNotFoundErr; 
else 
return DeleteLink( foundLinkPtr ); 
} 


CountLinks () starts off at the beginning of the list (at the link 
pointed to by fFirstLinkPtr), then uses GetNextLink() 
to walk down the list, counting links until we get to the last 
link, which will always have a next pointer of nil. 


unsigned long TLinkedList: :CountLinks () 


{ 
TLink *currentLinkPtr; 
unsigned long numLinks; 


numLinks = 0; . 
currentLinkPtr = fFirstLinkPtr: 


while ( currentLinkPtr != nil ) 

{ 

numLinkst+; 

currentLinkPtr = currentLinkPtr->GetNextLink(); 


return numLinks; 


} 


GetNthLinkObject() first checks to be sure the requested 
link is actually in the list. 

void *TLinkedList: :GetNthLinkObject( unsigned long 
linkIndex ) 

{ 


TLink *currentLinkPtr; 
unsigned long numLinks, curLinkIndex; 


numLinks = CountLinks(); 


if ( (linkIndex < 1) | (linkIndex > numLinks) ) 
return nil; 


Once we know we've got a valid link, we'll step through the 
list the proper number of times to get to the requested link, 
then call GetObjectPtr() to retrieve the object pointer. 


curLinkIndex = 0: 


currentLinkPtr tFirstLinkPtr: 


for (curLinkIndex=1; curLinkIndex<linkIndex: curLinkIndext+) 
currentLinkPtr = currentLinkPtr->GetNextLink(): 


return currentLinkPtr->GetObjectPtr() ; 


DeleteAllLinks() steps through the list and deletes every 
link in the list. Notice that we save the next pointer before we 
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delete the link so we don’t delete the next pointer along with it. 


void TLinkedList: :DeleteAllLinks() 


{ 
TLink *currentLinkPtr, *nextLinkPtr; 


currentLinkPtr = f£FirstLinkPtr; 


while ( currentLinkPtr != nil ) 

{ 
nextLinkPtr = currentLinkPtr->GetNextLink(): 
delete currentLinkPtr; 
currentLinkPtr = nextLinkPtr;: 

} 


fFirstLinkPtr = nil; 
fLastLinkPtr = nil; 
} 


FindLink() steps through the list (does this stepping code 
look familiar?) and returns the current TLink if its object 
pointer matches the parameter. If the entire list is searched and 
no match is found, FindLink() returns nil. 

TLink *TLinkedList::FindLink( void *objectPtr ) 


{ 
TLink *currentLinkPtr; 


currentLinkPtr = fFirstLinkPtr; 


while ( currentLinkPtr != nil ) 
{ 
if ( currentLinkPtr->GetObjectPtr() == objectPtr ) 
return currentLinkPtr;: 


currentLinkPtr = currentLinkPtr->GetNextLink(); 
} 
return nil; 


} 

DeleteLink() deletes the specified link, then reconnects the 
previous link with the link that follows the deleted link. 

OSErr TLinkedList::DeleteLink( TLink *linkPtr ) 


if ( linkPtr == nil ) 
return kLinkedList_CouldNotDeleteLinkErr: 


if ( linkPtr == fFirstLinkPtr ) 
fFirstLinkPtr = linkPtr->GetNextLink(); 
else 
linkPtr->GetPrevLink() -> 
SetNextLink( linkPtr->GetNextLink() ); 


if ( linkPtr == fLastLinkPtr ) 
fLastLinkPtr = linkPtr->GetPrevLink(); 
else 
linkPtr->GetNextLink() -> 
SetPrevLink( linkPtr->GetPrevLink() ); 


return noErr; 


LINK.H 


Link.h includes <types.h> to give it access to the definition 
of nil. 


ifndef _LINK_ 
define _LINK_ 


#include <types.h> 


The TLink class includes a single error code. 
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const short kLink BadLinkErr = -l; 


In addition to the constructor and destructor, the TLink class 
includes two setter and three getter functions. A setter function 
sets a data member to a specified value. A getter function returns 
the value of a data member. Though you can mark the data 
members as public, it's a better idea to limit access to them to 
getter and setter functions. By convention, getter and setter 
functions are defined in-line, rather than cluttering up the .cp file. 


class TLink 
{ 

public: 
TLink( void *objectPtr ); 
~TLink() ; 
SetPrevLink( TLink *prevLinkPtr ) 
fPrevLinkPtr = prevLinkPtr; } 
SetNextLink( TLink *nextLinkPtr ) 
fNextLinkPtr = nextLinkPtr; } 
virtual TLink  *GetPrevLink( 
return fPrevLinkPtr; } 
*GetNextLink ( 
return fNextLinkPtr; } 
*GetObjectPtr() 
return fObjectPtr; } 


Virtual 
Virtial void 


virtual void 


virtual TLink 





virtual void 








protected: 
TLink *fPrevLinkPtr; 
TLink *fNextLinkPtr;: 
void *f0bjectPtr: 
le 
fendif 


LINK.CP 


Since our five getters and setters were defined in the header 
file, the file Link.cp is pretty skimpy. The constructor 
initializes the link’s data members and the destructor does 
nothing at all. 


include "Link. h" 


TLink: :TLink( void *objectPtr ) 

{ & 
fObjectPtr = objectPtr; 
fPrevLinkPtr = nil: 
fNextLinkPtr = nil; 


TLink: :~TLink() 
, 

Tutt NExT MONTH... 
I love data structures. They are the backbone of any software 
program. Once you master the linked list, you can move on to 
binary trees (which are my personal favorites), then to hash tables 
and the like. I'll try to find an excuse to implement some of these 
structures as classes in a future column. In the meantime, 
experiment with these classes. Think about what you'd need to 
do to build a list of document objects using Sprocket. Where 
would you create the TLinkedList object? Would you need a 
global TLinkedList pointer? Where would you create the 
TLinks? Where would you put the code that deletes the TLinks? 
We'll address all of these issues next month... 
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By Eric Rosé, cp3a@andrew.cmu.edu 


Yenta and the Appletalk Class Library 


ChatterBox for the 
aspiring MOOSE 


A HISTORICAL NOTE... 


The infancy of my Macintosh 
programming life was spent writing 
network software and hacking Appletalk 
code; the scars have mostly healed. IAC 
and the Communication Toolbox have 
made network software easier to write, 
but there is still a burden on the 
programmer to manage zone and node 
identification, as well as actually sending 
the data - especially if you want to 
provide a different interface than the 
PPC Browser, or if you want to 
communicate invisibly (eg. an e-mail 
driver which should seamlessly perform 
the task of finding other people it can 
send messages to). 

This first part of this article describes 
the Appletalk Class Library — a modular 
and extensible approach to Appletalk 
communication using Think C++. The 
ACL is a set of objects which encapsulate 
tasks like initializing Appletalk, getting 
lists of zones, looking up and confirming 
addresses, and sending data between 
nodes. These objects are fully 
asynchronous, and provide a way for you 
to specify completion routines which can 





move memory (a big plus!). The second part of this article shows 
how to use these classes in conjunction with a number of TCL-like 
but fully C++ interface classes to build “Yenta” — a “chat” 
application in the spirit of Ron Hafernik’s “ChatterBox” program 
(yay Ron!). 


To SPARE YOU THE TROUBLE... 
The ACL itself consists of about 2800 lines of code, which 
clearly prohibits me from going into all of it in detail in this 


_ article. Much of the Appletalk code within the ACL has been 


seen before either in IM:IAC or DTS programs such as 
GetZoneList or DMZ. My general approach will be to give the 
declaration for each class I discuss and describe how it can be 
used, only showing method definitions when they illustrate 
some interesting or important concepts and programming 
strategies. The interface classes which I use to build Yenta are 
also of my own devising and consist of about 9000 lines of 
code. Since the focus of this article is on the ACL, I will not 
discuss them except when absolutely necessary. All the code 
for the ACL and the Yenta application is available from Xplain. 


APPLETALK REVIEW 

Anyone who wants the real lowdown on Appletalk network 
topology and protocols should read the second edition of 
“Inside Appletalk” or Michael Peirce’s book “Programming with 
Appletalk”. These details are not important for the 
development of the ACL, so this review will talk primarily about 
what kind of information we have to keep track of in order to 
communicate on an Appletalk network. 

Every Appletalk network consists of zero or more zones: 
each zone is represented by a unique name. If there is no zone 
at all, the name “*” is used as a default. Once you have the zone 
name you can perform lookups, confirmations, etc. Every 
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program you are debugging. With MMU Protection you can 
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later! (Macintoshs with 68030 CPUs only). 

The Debugger is the debugger of choice at: Adobe, 
Aldus, Claris, Electronic Arts, Kodak, Metrowerks, etc. 


WindowRecord_@465320 


WindowRecord 
O port 

108 windowk ind 
110 visible 
111 hil i ted 
112 goAwayF lag 
113 spareF lag 
114 Struchgn 
118 contRgn 
122 updateRgn 


‘CGratPor t_#4635320 
: s 


: TRUE 
- TRUE 
© TRUE 
: TRUE 
““Regionl4seor4 
**“Regionl485534 
*“Region_l4359B0 
126 windowDefProc “*DEF funRsrc_#s 768FO0 
130 dataHand!e > B455970 HE 
134 titleHandle : B4859018 = “Untitled-1" ie 
138 titleWidth 6? BE 
140 ControlList : AHIL EE 
144 nexthHindaw *WindowRecord_P465273 FS 
145 windowPic > AIL 
152 refCon : $O00464F25 


An example of a structured data display window 





Its Features Include: 


® Symbolic Debugging of any Macintosh program, ROM, or 
code resource (DRVRs, XCMDs, INITs, PDEFs, 4DEXs ..) 
® Source level debugging for Metrowerks & MPW compiled 


programs (C++, C, Pascal, Fortran, ...), and an Incremental 
Build System with instant Link for superfast development. 


® Object Inspector for MacApp 3 programs 
© Source level debugging of Think C™ projects 


® Includes a program (CoverTest) to interactively do Code 
Coverage analysis for SQA testing, etc. 


® Simultaneous Symbolic debugging of multiple “tasks” 


® Fast Software Watchpoint command to find clobbered 
variables 


® Sophisticated error check algorithms such as Trap 
Discipline (Argument Checking), Handle Zapping, Heap 
Scramble and Heap Check to detect program errors before 
they become disasters 


® Structured display of data (hypertext) with user 
definable structures while debugging 


® Conditional breakpoints to help filter out redundant 
information 


® Continuous Animated Step Mode to watch your 
program execute instruction by instruction 


® Detailed symbolic disassembly for both 680x0 and 
PowerPC with symbol names, labels, cross ref maps, - 
make it possible to ferret out the secrets of the ROM, etc. 


® "Training Wheels" for the PowerPC disassembler to help 
you learn the opcodes 


The Debugger V2 & MacNosy: $350 
Runs on all Macs. Call For Group prices or Updates. 
Visa/MC Accepted. 


Available from: Jasik, APDA, Frameworks or 
ComputerWare (800-326-0092). 


Jasik Designs + 343 Trenton Way, Menlo Park, California 94025 + (415) 322-1386 





Internet: macnosy@netcom.com «¢ Applelink: D1037 





‘visible’ entity within a zone has a unique name which is 
specified by an object name, a type, and the zone name; the 
commonly used format is name:type@zone. All network entities 
also have a numerical address made up of a node number (the 
ID of the computer they are on), a socket number (a number 
between 1 and 255 which specifies a socket on the computer) 
and a zone number. There may be multiple zone numbers 
assigned to each zone name. Some things you can do with 
network addresses are 1) formally register them on the network 
(making them visible); 2) deregister them (making them 
invisible); 3) look for addresses matching a certain name or 
pattern; and 4) confirm an address which you obtained earlier. 

The ACL uses the PPC Toolbox (IM:IAC, ch 11) to do its 
data transmission. The PPC Toolbox extends the ‘address’ of a 
network entity by adding to the “name:type@zone” identifier a 
theoretically infinite number of ports — each described by a 
unique “pname:ptype” pair. For the purpose of simplicity, the 
ACL uses the same ‘name’ for both the location name and the 
port name, although you can still specify different location and 
port types if you want. 

Asynchronicity is a vitally important aspect of Appletalk 
communication. Ideally all communication will be 
asynchronous so that we can be doing node lookups and 
confirmations while we are sending large amounts of data. To 
determine when such a task completes, you either have to poll 
a flag in the task record, or assign a completion routine which 
is limited in power because it can’t move memory; generally 
they simply set global variables which are polled by the 
application. The ACL provides an object (CPPPeriodicTask) 
which acts as a wrapper for periodic tasks, and a second class 
(CPPPeriodicTaskManager) which performs all of the polling 
operations for you. All you have to do is specify a method or 
routine to be run when the task completes, hand it to a 
CPPPeriodicTaskManager object and let things take care of 
themselves. Because your method is not called at interrupt 
time, as would a traditional completion routine, you can feel 
free to move as much memory as you want to. 


OOP(s)! 
Enough talk of what has to be done; let’s talk about how to do 
it! All of the nifto features we've discussed above are 
implemented in the ACL in three abstract base classes and nine 
concrete classes. To build on a firm foundation, we'll look at 
the abstract classes first. 


LAYING THE FOUNDATION 


CPPObject 


All of the objects in the ACL have a single abstract base 
class called CPPObject (the declaration for which is shown 
below). Besides providing a common ancestor, this class gives 
every object the potential for making an exact copy of it 
(Clone) or returning its name as a c-string to anyone who asks 
(ClassName). We will see the utility of this feature later. 
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class CPPODTect: 1 
public: 
CPPObject (void); 
virtual ~CPPObject (void); 
virtual char *ClassName (void); 
virtual CPPObject *Clone (void); 
iS 


Asynchronicity 


Directly descended from CPPObject is CPPPeriodicTask — 
an object which encapsulates the data and methods needed to 
maintain an asynchronous task. Associated with 
CPPPeriodicTask is CPPTaskManager, which maintains a 
list of all periodic tasks and is responsible for making sure that 
each task is called at least as often as it needs to be. Here are 
declarations for these classes. I elaborate on them below. 


typedef void (*CompletionProc) (CPPObject *TheTask) ; 


class CPPPeriodicTask : public CPPObject { 
public: 

Boolean isRunning; 

Boolean hasCompleted; 

Boolean deleteWhenDone; 


CPPPeriodicTask (CPPTaskManager *TaskManager, 
long minPeriod = 120, 
Boolean deleteWhenCompleted = TRUE); 
~CPPPeriodicTask (void) ; 
virtual char *ClassName (void); 


// Setter and accessor methods 

long GetPeriod (void); 

long GetTimesCalled (void); 

void SetPeriod (long newPeriod) ; 

OSErr TaskError (void); 

void SetCompletionProc (CompletionProc NewProc) ; 


// user-specific methods 
virtual Boolean NeedsToRun (void); 
virtual void DoPeriodicAction (void) ; 
virtual void DoCompletedAction (void) ; 

protected: 
OSErr callResult; 
CPPTaskManager “*ourManager; 
CompletionProc completion; 

private: 

long minimumPeriod; 

long lastCalled; 

long timesCalled; 

I 


class CPPTaskManager : public CPPObjectList { 
public: 
CPPTaskManager (void); 
~CPPTaskManager (void); 
virtual char *ClassName (void); 


Boolean AddPeriodicTask (CPPPeriodicTask *TheTask) ; 
Boolean RemovePeriodicTask (CPPPeriodicTask *TheTask, 
Boolean disposeOfTask) ; 

long HowManyTasksOfType (char *ClassName) ; 

void RunPeriodicTasks (void); 

short HowManyPeriodicTasks (void); 
lf 
CPPTaskManager (PTM) is subclassed off of an object which 
maintains a list of CPPObjects. Since CPPObject is the base 
class of the entire ACL, this list can hold any object in the ACL; 
in this case the list only contains CPPPeriodicTask objects, 
or any object descended from them. 


The AddPeriodicTask and RemovePeriodicTask 
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methods are semantically identical to append and delete 
operations on lists. One thing to note is that the ‘Remove’ 
method gives you the option of disposing of the task or merely 
removing it from the list. The two ‘HowMany???’ methods let 
you count the total number of objects in the queue, or the 
number of objects belonging to a specific class. The code for 
HowManyTasksOfType is shown below, and demonstrates 
the use of the ClassName method. 


long CPPTaskManager::HowManyTasksOfType (char *ClassName) 
/* returns how many objects of type “ClassName” are in the queue */ 
{ 

longi = 1; 

long Count = 0; 


while (i <= numItems) 
( 
if (stremp (((*this) [i])->ClassName(), ClassName) == 0) 
Count ++; 
sa 


return Count; 


The key method in the PTM class is RunPeriodicTasks, 
which iterates through all the tasks which it manages, executing 
those whose periods have expired and removing those which 
have completed. The code for this method is shown below: 


void CPPTaskManager::RunPeriodicTasks (void) 

/* Give all of the periodic tasks we manage a chance to execute */ 
longi = 1; 
CPPPeriodicTask *TheTask; 
while (i <= numItems) 

if (TheTask = (CPPPeriodicTask *) ((*this) [i])) 


// execute the task if it needs to run 
if (TheTask->NeedsToRun()) 

f 

TheTask->isRunning = TRUE; 

BroadcastMessage (kTaskActivated, (void *)i); 
TheTask->DoPeriodicAction() ; 
TheTask->isRunning = FALSE; 

BroadcastMessage (kTaskDeactivated, (void *)i); 


\ 
J 


// if it has completed remove it from the queue 
if (TheTask->hasCompleted) 
f 
l 
CPPList::DeleteItem(i, FALSE) ;// Dequeue w/o deleting 
TheTask->DoCompletedAction(); // Perform final operation 
if (TheTask->deleteWhenDone) // Dispose of the task if 
delete TheTask; // requested 
else  //advance to the next item if we don't delete this one 
irr; 
} 
} 
} 


On each call to RunPeriodicTasks, each task in the queue 
is asked to determine whether or not it needs to run; if it does, 
the PTM calls DoPeriodicAction (the contents of which will 
be explained in a minute). If during execution, the periodic 
task determines that it is done, the PTM removes the task from 
the queue, calls DoCompletedAction to let the task perform 
any special final actions, and then deletes it, if requested to. 
Ideally RunPeriodicTasks should be called once during 
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every iteration of the application’s main event loop in order to 
give enough processing time to the tasks in the PTM. 

CPPPeriodicTask is an abstract base class whose only 
job is to maintain all the bookkeeping information which the 
PTM needs to service it. Each task has associated with it a 
minimum period which indicates (in ticks) how often it is to 
run. Unlike the Time Manager, this is not a guaranteed rate of 
service — it merely indicates that the task will be run no more 
often than once every n ticks. While this is an acceptable 
strategy for polling periodic lookup/read/write tasks, I wouldn't 
advise it for controlling vital processes. 

The key functional methods in CPPPeriodicTask are 
NeedsToRun, DoPeriodicAction and DoCompletedAction. 
The basic NeedsToRun method subtracts the last called time of 
the task from the current time, and returns TRUE if that amount 
exceeds minimumPeriod. If you want you could override it 
to take the state of the task into account, as well as the period. 

The basic DoPeriodicAction method merely 
increments the timesCalled variable and stores the current 
time in lastCalled. Any override of DoPeriodicAction 
should call the inherited method so that this bookkeeping 
information is maintained. An important job which must be 
done by the user’s DoPeriodicAction method is setting the 
public hasCompleted flag, which the PTM checks to see 
whether the task should be dequeued. 

DoCompletedAction allows the user to customize the 
task’s final behavior in two ways. Here is the code for the 
basic method: 


void CPPPeriodicTask::DoCompletedAction (void) 
/* execute the completion routine, if there is one */ 


if (this->completion) 
(*this->completion) ((CPPObject *)this); 


One way to customize DoCompletedAction would be 
to overload it to perform any necessary data copying, 
notification, etc. The other way is to use 
SetCompletionProc to specify a routine to be called 
explicitly. Why do we need to be able to do it both ways? 
Glad you asked! As an example, most of the ACL’s lookup 
tasks allocate goodly-sized chunks of memory which are only 
used when a lookup is underway. Principles of information 
hiding make it more logical to dispose of this memory in an 
overridden method than an external routine. 

On the other hand, many times when we do a lookup we 
would like the results to be displayed somewhere. Principles 
of information hiding argue that this kind of ‘display-specific’ 
code should not be placed inside the task itself. In addition, it 
would become tedious and wasteful to have to create several 
subclasses of the same kind of lookup task which differ only in 
their completion routines. This all becomes much clearer when 
we discuss the construction of the Yenta application, so don’t 
worry if this doesn’t quite make sense yet. 
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PORING (OVER) THE CONCRETE 


Now that we have discussed the abstract classes, let’s move on 
to the ones which do the gruntwork. 


MaBell 

In order to use Appletalk, you need a set of maintenance 
routines which let you do things like find out driver numbers, 
turn self-send capability on and off, initialize the PPC Toolbox, 
etc. To save the programmer worry (and time spent flipping 
through IM) I encapsulated these routines in a class called 
CPPMaBell, whose declaration is shown below 
class CPPMaBell : public CPPObject { 
public: 


CPPMaBell (Boolean AllowSelfSend = TRUE); 
~CPPMaBell (void); 


virtual char *ClassName (void): 


// General Appletalk Utilities 


OSErr OpenATalkDriver (short whichDrivers) ; 
short GetDriverNumber(short whichDriver): 
short GetAtalkVersion (void); 


Boolean HasPhase2ATalk (void); 
Boolean EnableSelfSend (void); 
Boolean DisableSelfSend (void); 
Boolean SelfSendEnabled (void); 


// PPC Toolbox routines 
OSErr InitPPCToolbox (void); 
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OSErr OpenCommunicationPort (StringPtr OurName, 


StringPtr PortType, 
PPCPortRefNum *newRefNum) ; 
OSErr CloseCommunicationPort (PPCPortRefNum portRefNum) ; 
OSErr EndSession (PPCSessRefNum sessionID); 
private: 
short XPPRefNum, 
MPPRefNum, 
ADSPRefNum; 


short AtalkVersionNumber; 
Boolean SelfSendState; 
14 


The majority of these routines are unspectacular, but necessary. 
One routine of interest is OpenCommunicationPort, which 
shows how to open a PPC Toolbox Port. This code modifies 
the example code in IM:IAC, p. 11-21, by setting the 
connection’s full address to “OurName:PPCCommPort” at 
location “?’s Macintosh: OurNameePortType@ zone”. 

OSErr CPPMaBell::OpenCommunicationPort (StringPtr OurName, 


StringPtr PortType, 
PPCPortRefNum *newRefNum) 


PPCOpenPBRec Openkec; 
PPCPortRec PortRec; 
LocationNameRec LocationRec; 
EntityName TheName ; 
OSErr ErrCode; 


// set up the port specification record 
PortRec.nameScript = smRoman; 
PortRec.portKindSelector = ppcByString; 
CopyString (OurName, PortRec.name) ; 
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CopyString ("\pPPCCommPort", PortRec.u.portTypeStr) ; 


// set up the record which describes who we are 

LocationRec.locationKindSelector = ppcNBPTypeLocation; 

PStrCat (32, &LocationRec.u.nbpType[0], 3, OurName, 
"\pe", PortType) ; 

// set up the ‘open port' record 

OpenRec.serviceType = ppcServiceRealTime; 

OpenRec.resFlag = 0; 

OpenRec.portName = &PortRec; 

OpenRec.locationName = &LocationRec; 

OpenRec.networkVisible = TRUE; 


// make the call and, if no errors, get the port number 

if ((ErrCode = PPCOpen (&OpenRec, FALSE)) == noErr) 
*newRefNum = OpenRec.portRefNum; 

else 
*newRefNum = -1; 

return ErrCode; 


CPPNODEINFO 


As mentioned in the Appletalk Review, network entities can be 
identified using three strings and/or three numbers. The 
CPPNodeInfo object whose declaration is shown below is the 
ACL’s common denominator for representing network entities. 
All six pieces of address data are freely settable and accessible, 
placing no restrictions on the protocol you use to communicate 
with (eg. DDP uses only the numbers, PPC only the names). 


class CPPNodeInfo : CPPObject { 
public: 
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CPPNodeInfo (void); 
~CPPNodelInfo (void); 
virtual char *ClassName (void); 


void SetNodeName (StringPtr ObjectStr, StringPtr TypeStr, 
StringPtr ZoneStr) ; 

void SetNodeAddress (short SocketNum, short NodeNum, 
short ZoneNum) ; 

void GetNodeName (StringPtr *ObjectStr, StringPtr *TypeStr, 
StringPtr *ZoneStr) ; 

void GetNodeAddress (short *SocketNum, short *NodeNun, 
short *ZoneNum) ; 

StringPtr ReturnNameString (void); 

StringPtr ReturnShortNameString (void); 


Boolean RegisterNodeAddress (OSErr *ErrCode) ; 
Boolean DeregisterNodeAddress (OSErr *ErrCode) ; 
Boolean ConfirmNodeAddress (OSErr *ErrCode) ; 


Boolean Equals (CPPNodeInfo *TestNA) ; 
CPPObject *Clone (void); 
Ptr InfoToStream (void) ; 

private: 
NamesTableEntry *NTE; // only defined if registered 
StringPtr objectString, 


typestring, 
zonesString; 
unsigned char socketNumber, 
nodeNumber ; 
short zoneNumber ; 
Boolean isRegistered; 


ie 
CPPNodeInfo *StreamToInfo (Ptr Buffer, Ptr *BufferEnd) ; 


In addition to managing the network address and name data, 
CPPNodelnfo lets you register and deregister address on the 
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network, so that any CPPNodeInfo entity can be made visible 
to the outside world. For convenience, a synchronous routine, 
ConfirmNodeAddress, has been provided to let you check to 
see if the entity’s address has changed behind your back. 

InfoToStream and StreamToInfo provide the ability 
to write the node’s address out to a block of memory and then 
reconstruct a CPPNodeInfo record from such a block of 
memory. This is provided so that you can send addresses back 
and forth between machines without any loss of data. 

Finally, CPPNodeInfo provides a Clone method which 
creates a CPPNodeInfo object which refers to the same object 
as the original, and an Equals method, which tests a passed-in 
object to see if it refers to the same object as the one which 
makes the method call. 


411 — CPPPERIODICTASK RETURNS 

In the Appletalk Review, we talked about two different kinds of 
lookup we want to be able to do - lookup of zone names 
(including the zone we are in) and lookup of all network 
entities whose names match a predefined pattern. In the ACL, 
these two jobs are performed by subclasses of 
CPPPeriodicTask, affectionately known as CPPZone411 
and CPPNode411. Here are their declarations (for brevity, I’ve 
omitted their private variable and method declarations). 
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class CPPZone4l1l 
public: 


: public CPPPeriodicTask { 


CPPZone41l (CPPTaskManager *TaskManager, 
CPPMaBell *MaBell, long minPeriod = 120, 
Boolean deleteWhenDone = TRUE); 
~CPPZone4l1l1 (void); 
virtual char ‘*ClassName (void); 


virtual void DoPeriodicAction (void); 
virtual void DoCompletedAction (void); 
Boolean NthZone (long whichItem, Boolean getCopy, 
StringPtr *ZoneName) ; 
long NumZonesFound (Boolean *isDone) ; 
void StartZoneLookup (CompletionProc DoProc) ; 
StringPtr GetOurZoneName (OSErr *ErrCode); 
CPPStringList *GetFoundList (void); 
protected: 
CPPStringList *FoundList; 
private: 


ee 
class CPPNode41l 
public: 


: public CPPPeriodicTask { 


CPPNode411 (CPPTaskManager *TaskManager, 
long minPeriod = 120, 
Boolean deleteWhenDone = TRUE); 
~CPPNode411 (void); 
virtual char *ClassName (void): 


virtual void DoPeriodicAction (void): 


virtual void DoCompletedAction (void); 
CPPNodeInfo *NthNode (long whichItem, Boolean getCopy): 
long NumNodesFound (Boolean *isDone); 
void StartNodeLookup (StringPtr ObjectName, 
StringPtr TypeName, 
StringPtr ZoneName 
short maxNumResponses, 
CompletionProc DoProc) ; 
CPPObjectList *GetFoundList (void); 
protected: 
CPPObjectList *FoundList; 
private: 


- 


Each class maintains a list of names or nodes which it has 
found, and provides a similar interface (Nth???, 
Num???Found, and GetFoundList) for accessing them. 
CPPZone411 provides an additional routine called 
GetOurZoneName which returns the name of the network our 
machine resides on. The details of how to perform zone and 
node lookup have been discussed many times in IM and 
programs like DMZ and GetZoneList from Apple DTS, so I won't 
go into those here. It is, however, worth looking at the 
DoPeriodicAction, DoCompletedAction, and 
Start???Lookup methods to see how you can use the 
CPPPeriodicTask abstract class to do something useful. We'll 
look at CPPNode411, since node lookup is considerably more 
straightforward. 

To begin a node lookup, one-~ calls the 
StartNodeLookup method, passing it the name, type, and 
zone names to match against, along with the maximum number 
of responses you want, and the address of a routine to call on 
completion. Here are the guts of StartNodeLookup. 
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Cross-Platform Object 
Database Engine 


Full Featured 


NeoAccess™ allows you to embed the power of a full-featured object-oriented database engine into your 
Macintosh, Windows and DOS based applications. No other object database engine can match NeoAccess's 
impressive feature set, including: Blobs, part lists, iterators, swizzlers, temporary objects, multiple indices on a class, 
schema evolution, a powerful relational query mechanism, a streams-based i/o model and incredible performance. 


High Performance 


Internally, NeoAccess uses extended binary trees and binary search 
algorithms to achieve optimally short access times. Its automatic 
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query optimizer ensures that queries always use the fastest access = ee 
path to objects. And indices are dynamically combined, collapsed 5 245 os 
and compressed to keep access times to an absolute minimum as D 20 @ 3/4MB 
the contents of a database changes. NeoAccesss object caching ” a 
boosts performance by keeping objects in memory even after being s 216 
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disposed of by the application. Your application's memory size is 
reduced because only those objects of immediate interest need to be 
in memory at any one time, not the entire file. 


Full Sou rece Code Objects in Database 


We've taken a frameworks approach toward object persistence and database technology. In much the same way that 
application frameworks are used to construct the front-end of an application, NeoAccess is the framework you use 
to build your application's back-end. As is the case with virtually all object frameworks, the NeoAccess Developer's 
Toolkit comes complete with full source code, for all major application frameworks including Metrowerks' 
PowerPlant, Symantec's THINK Class Library and Apple's MacApp on the Macintosh and Microsoft's 
Foundation Classes, Inmark's zApp and Borland's ObjectWindows in Intel-based environments. It can even be 
used without a framework or in one that you've designed. 


Easy to Use 


The programming interface is designed around the concept of minimum visible complexity. Application-specific 
objects inherit persistence properties from a NeoAccess base class. These objects are organized in the database 
primarily by class. But NeoAccess also knows how classes are related. So multiple classes can be searched in a single 
operation. And of course objects of any particular class can be organized using multiple indices. NeoAccess is 
unique in that it allows objects to be located based on abstract selection criteria or based on their relationship to 
other objects. There’s literally no database administation to deal with — NeoAccess takes care of all the details. 
NeoAccess also includes a Blob mechanism which allows free-form variable-length data to be stored in databases 
with the same ease as fixed-length objects. NeoAccess even includes a powerful set of keyed iterators for traversing 
indices and part lists. Keyed iterators have the unique ability to iterate over only those objects in a set that match a 
given selection criteria. Your users will appreciate NeoAccess because databases are completely self-contained in a 
single document file. So users can treat a database file as they would any other document. 


Proven 

NeoAccess has been commercially available since May of 1992. Hundreds of commercial and in-house applications 
based on NeoAccess technology have already been deployed. NeoAccess can help your organization deliver powerful 
products in a more timely fashion than you ever imagined possible. 


Affordable 


NeoAccess's best feature is its price. The NeoAccess Developer's Toolkit sells for just $749 per developer with 
absolutely no runtime licensing fees. It includes full source code, numerous sample applications, 450+ pages of 
documentation, and 30 days of technical support. So what are you waiting for? 
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Unfortunately, most users must interact with relational databases at the SQL level or be- 
hind a front-end that can take months to develop. 


select invoice_num,invoice_date,cust_id,cust_name from invoices,customers where invoice_id = 112;printall; 


Why not view and edit your data at the Finder level? Announcing Cataloger™. 





ataloger brings a whole new way of working with databases to the Macintosh. 
The Finder™ has always provided a view of our desktop files, why not database 
records too? 
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Apple's Open Collaborative Environment places a catalog icon at the Finder. 
Open the icon up and you'll see a window like the one above. The AppleTalk 

catalog shows nodes on the network. The PowerCat catalog shows users and 
groups in a PowerShare Server. 





The Contact and Invoices catalogs (for example) can show information from 4D | SEP 
Server, DAL/DAM , Oracle and Sybase databases! If your needs are more custom- | 
ized, you can write AppleScript handlers to provide the contents of your catalog. 





The Catalog Manager (an AOCE API) allows for Catalog Service Access Modules 
(CSAMs) to be created that interact with external sources. 


The Finder and other applications make requests through the Catalog Manager and 
Cataloger does the rest. There are no limits to the amount of data brought back. 








Templates provide the ability to view and edit individual records. AOCE Templates 
are designed with Template Constructor™. This powerful application 

let's you easily design forms to view data coming from several sources, control 
behavior with C and AppleScript, and view row/column data with Tablelt!™ - a 
powerful data display tool. 





Invoice Date: |9/1,/°94 
Terms - Net 30 Days ¥ 


Part * | Description Cost Each | Line Total 
(2142 | Propeller | 250 : 250 iP 


| Main Light assembly : 


: Spark Plugs 


Prepared boat for summer season. Subtotal: 1O5 7.00 
Dewinterized, tuned up and replaced main ; [52.89] 
propeller. Light assembly replaced after 22.05 
testing frant lights failed. Total:| 1110.69) 


_ Access information and catalog definitions are stored in and protected by the 
EE py AOCE Keychain. Your users can have one username and password for a variety 
% of data sources! 





Need more horsepower? Database Scripting Kit™ provides AppleScript access 
to all of the connection information and data sources. Write AppleScript routines 
that send queries and parse results from within your own application. 
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void CPPNode411::StartNodeLookup (StringPtr ObjectName, 
StringPtr TypeName, 
StringPtr ZoneName, 
short maxNumResponses, 
CompletionProc DoProc) 


if ((!this->hasCompleted) | | (!this->ourManager) ) 
return; // exit if doing a lookup or bogus params 


// otherwise, set up the call 
this->SetCompletionProc(DoProc) ; 

this->hasCompleted = FALSE; // note we are not done 
this->FoundList->DeleteItems (TRUE) ; // get rid of old results 


SetupNBPCall(ObjectName, TypeName, ZoneName, maxNumResponses) : 


if (this->callResult == noErr) 
this->ourManager->AddPeriodicTask (this) ; // now add the task 


The first thing the task does is check its own hasCompleted 
flag to see if it is currently doing a lookup. Once it determines 
that it is not already busy, it sets the flag to FALSE, so that the 
PTM will not toss it out as soon as it is enqueued. It then 
clears any nodes which may have been found earlier from its 
list of ‘found’ nodes. SetupNBPCall is a private method 
which allocates the necessary storage, fills in the paramBlock 
for an NBP call, and makes the PLookupName call — storing its 
result in the class’ callResult variable. If the call is made 
successfully, the only thing left to do is add the task to the 
PTM’s list of serviceable tasks. All subsequent activity is 
managed by the DoPeriodic/CompletedTask methods. 
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Here’s CPPNode411’s DoPeriodicAction method: 


void CPPNode411::DoPeriodicAction (void) 

{ 
// call the inherited method to update frequency count 
CPPPeriodictask: :DoPeriodicAction(); 


switch (this->lookupRec->MPPioResult) { 
case noErr : //the call has completed 
this ->ProcessNodes (lookupRec->NBPnumGotten) ; 
this->hasCompleted = TRUE; 
this->callResult = noErr; 


break; 

case l_ : // still busy getting names 
break; 

default : // an error occurred 


this->callResult = lookupRec->MPPioResult; 
hasCompleted = TRUE; 
break; 
} 
} 


As one might expect, the periodic task checks the ioResult 


parameter of the paramBlock which was used to make the 


PLookupName call and responds appropriately. If it has 
completed successfully, it calls ProcessNodes which extracts 
all of the nodes from the lookup buffer, then sets the 
hasCompleted flag so the PTM will remove it from the 
queue. If the call has completed with an error, the task also 
sets the hasCompleted flag, but records the error so that the 
programmer can use the TaskError method to find out what 
went wrong. 

When RunPeriodicTasks sees that the hasCompleted 
flag is set, it will call CPPNode411’s DoCompletedAction 
method: 


void CPPNode411::DoCompletedAction (void) 


| NukePtr(this->returnBuffer) ; 
NukePtr(this->lookupRec) ; 
inherited: :DoCompletedAction(); 


As mentioned earlier, this method is used exclusively to 
free up memory allocated in StartNodeLookup before 
calling the inherited method which will call the completion 
routine the user passed to StartNodeLookup. Here’s an 
example of such a completion routine: 


void NodeLookupCompleted (CPPObject *TheTask) 
[ add each 'found' node to a list of users */ 


lean BTemp ; 
ng, numFound ; 


numFound = LookupTask->NumNodesFound (&BTemp) : 
if (numFound && BTemp) 


for (long i = 1; i <= numFound; i++) 
UserList->AddNode (LookupTask->NthNode (i, FALSE)); 


Though the guts of the Start, DoPeriodic, and 
DoCompleted code are different in CPPZone411 and every 
other periodic task, the basic strategy remains the same: 
allocate memory for the call in Start, check the ioResult 
flag in DoPeriodicAction, and deallocate the memory in 
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DoCompletedAction. 

A third task which falls partially under the pervue of 411 is 
CPPConfirmTask, which takes a CPPNodeInfo object and a 
completion routine, and sets a flag to indicate whether the 
node still exists on the network. The unique parts of its public 
declaration are shown below: 
class CPPConfirmTask : public CPPPeriodicTask | 
public: 

CPPNodeInfo *NodeToConfirm; 
CPPConfirmTask (CPPTaskManager *TaskManager, 
long minPeriod = 120, 


Boolean deleteWhenDone = TRUE); 
~CPPConfirmTask (void); 


Boolean NodeExists (void) ; 
void StartNodeConfirm (CPPNodelInfo *TheNode, 
CompletionProc DoProc) ; 
private: 


bs 


THE THREE R’s...AND THE OTHER GUY 
When using the PPC Toolbox to exchange data, the strategy is to 
open a connection on your computer, wait for someone to start a 
session with you, perform all necessary reads and write, then close 
the session. We will, therefore, need four more tasks to let us 
exchange data over the network — ‘read’, ‘write’, and ‘respond to 
connection requests’. Oh yes, and ‘initiate connection requests’. 
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Responding... 

Listening for a connection is done by posting a 
PPCInform call; connections can be accepted or rejected 
based on authentication information which the caller provides. 
In the ACL, CPPMaBell’s OpenCommunicationPort is used 
to open a port on your machine which someone can connect 
to. A subclass of CPPPeriodicTask called CPPListenTask 
does the ‘waiting’ by posting and polling a PPCInform call. 
In its current form, it automatically accepts all connections 
which people try to form with it. If you wanted to provide 
authentication, you could simply subclass CPPListenTask, 
set it to not automatically accept, then have its 
DoCompletedAction method perform the needed 
verification. The unique parts of the declaration for 
CPPListenTask are shown below: 
class CPPListenTask : public CPPPeriodicTask [{ 
public: 

CPPListenTask (CPPTaskManager *TaskManager, 
long minPeriod = 120, 


Boolean deleteWhenDone = TRUE); 
~CPPListenTask (void); 


PPCSessRefNum GetNewSessionID (void); 

void GetConnectedToInfo (Boolean *hasConnected, 
LocationNamePtr *Location, 
PPCPortPtr *PortRec); 
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void StartListenTask (PPCPortRefNum PortID, 
CompletionProc DoProc); 

protected: 

PPCSessRefNum  sessionID; 
private: 
ia 
You start the connection task by passing it the reference 
number of the port opened by CPPMaBel1, and a completion 
routine. When the task completes, you can get the reference 
number for the session, and information about the person you 
are connected to using the GetNewSessionID and 
GetConnectedToInfo methods. The guts of 
StartListenTask are merely a modification of the code in 
IM-IAC, p. 11-36, and so are not repeated here. 


Reading... 

Once a connection is open, a PPCRead task should be 
posted asynchronously to receive any data coming in on the 
connection. The ACL task which lets you do this is called 
CPPReadTask; the unique parts of its declaration are shown 
below. 
class CPPReadTask : public CPPPeriodicTask { 
public: 

CPPReadTask (CPPTaskManager *TaskManager, 
long minPeriod = 120, 


Boolean deleteWhenDone = TRUE); 
~CPPReadTask (void); 


Size (void); 
(Boolean BecomeOwner, 
Boolean *AmITheOwner) ;: 
void StartReadTask (PPCSessRefNum ConnectionlD, 
short blockSize, 
CompletionProc DoProc) ; 


long G 
Handle Get 


protected: 
PPCSessRefNum sessionID; 
private: 


You start a CPPReadTask by specifying a session number 
(obtained from CPPListenTask) and the size of the blocks 
you want to read. CPPReadTask starts out with an empty 
data handle, and a buffer of size blockSize in which data is 
temporarily stored. As data is sent over to it from the other end 
of the connection, it is accumulated into the data handle in 
blockSize sized chunks. The ‘optimal’ block size to use will 
depend heavily on the application; for transmitting typed 
messages, 128 bytes is probably fine; for doing file-transfers, 
you probably want to go to 1024 or 2048 bytes per block. 
When the task is completed, GetDataSize tells you how 
much was read, and GetData returns a handle to the data and 
lets you establish ownership of it. The distinction of who owns 
the actual data handle becomes important when more than one 
object calls GetData on the same CPPReadTask. It is also 
important to determine whether the data will remain after the 
CPPReadTask is deleted. When you call GetData, you use 
BecomeOwner to tell it whether or not you will take 
responsibility for disposing of the handle. When you get the 
handle back, the AmITheOwner variable is set to indicate 
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whether you succeeded in getting ownership of the handle, or 
whether someone else already owns it. 

Note that a good time to post the first CPPReadTask on 
an open connection is in the completion task of the 
CPPListenTask which received the connection in the first 
place. I did not do this in CPPListenTask both to make it 
more flexible and to reduce the coupling between classes in 
the ACL, but the CPPYListenTask subclass used by the Yenta 
application uses this strategy most effectively. 


Writing... 

On the other end of the connection from PCCInform and 
PPCRead, a PPCWrite task must be posted asynchronously to 
dump a chunk of data across the network. This duty is carried 
out by CPPWriteTask class (declaration below). 
class CPPWriteTask : CPPPeriodicTask { 
public: 

CPPWriteTask (CPPTaskManager *TaskManager, 
long minPeriod = 120, 


Boolean deleteWhenDone = TRUE); 
~CPPWriteTask (void): 


~ void StartWriteTask (Ptr DataToWrite, Boolean OwnsData, 
PPCSessRefNum ConnectionlID, 
CompletionProc DoProc, 
OSType DataType = "2222", 
OSType DataCreator = "???2"); 

void tartWriteTask (PPCPortRefNum SourcePortRefNun, 

CPPNodeInfo *SendTo, 
Ptr DataToWrite, Boolean OwnsData, 
CompletionProc DoProc, 
OSType DataType = "2222", 
OSType DataCreator = "??72"); 

private: 

be 

To provide flexibility, this task may be started in one of 
two ways. The first is to pass it a CPPNodeInfo object 
corresponding to the network entity you want to communicate 
with, the data, the ownership flag, and the block’s type and 
creator. In this case the write task synchronously establishes 
the session for you, making the assumption that the person you 
are trying to talk to has followed the naming conventions for 
ACL objects (see the description of CPPMaBell). A drawback 
of using synchronous connect is that you cannot connect to 
another port on your own computer. 

The second way to start CPPWriteTask is to pass it the 
reference number of an established connection (which requires 
that you establish the connection yourself) along with the data 
you want to send, a boolean flag indicating whether it is 
allowed to dispose of the data on completion, and the type and 
creator of the data block. 

“But how do I establish a connection?” Funny you should 
ask. The ACL provides a class which lets you asynchronously 
establish a connection with another network entity and return 
the reference number of the established connection. The 
declaration for this class (CPPConnectTask) is shown below. 
class CPPConnectTask : CPPPeriodicTask { 


public: 
CPPConnectTask (CPPTaskManager *TaskManager, 
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long minPeriod = 120, 
Boolean deleteWhenDone = TRUE); 
~CPPConnectTask (void); 


PPCSessRefNum GetSessionID (Boolean *isDone) ; 
void StartConnectTask 
PPCPortRefNum SourcePortRetNun, 
CPPNodeInfo *ConnectTo, 
CompletionProc DoProc) ; 
protected: 
PPCSessRetfNum sessionID; 
private: 
I 
As with the second StartWriteTask call, all you have 
to do is pass it the reference number of the port on your 
computer, and the network address of an entity which you 
wish to talk to and has followed the naming conventions for 
ACL network objects. When the task completes, you can use 
the GetSessionID call to get the reference number to pass to 


the second StartWriteTask call. 


And...Closing? 

When you have finished reading and writing data across a 
session, you can call CPPMaBell::CloseSession to close 
the connection between the two computers. Something to be 
wary of when you are figuring out where to make the call to 
CloseSession, is that closing from the writer’s end can 
sometimes interrupt the read task. It is much better to have the 
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end which does the reading close the session when it 
completes so that you can be sure that it actually receives all 
the data it was sent. Ideally CloseSession would be called 
by CPPReadTask’s completion method, which could then post 
another CPPListenTask (sort of like having 
CPPListenTask’s completion method posting a 
CPPYReadTask). The ACL’s CPPReadTask does not do this, 
since it would create restricting dependencies on the 
CPPReadTask and CPPListenTask, but you are encouraged 
to implement this behavior in a subclass of CPPReadTask. 


Tuat’s ALL FOLKS 
Believe it or not, we’ve covered the entire Appletalk Class 
Library. As you’ve noticed, the only data transmission protocol 
I use is that provided by the PPC Toolbox. With the 
information provided by the CPPNodeInfo class, you should 
be able to subclass CPPPeriodicTask to provide support for 
ATP, DDP, ADSP, or any other protocol you care to use. 


YENTA 
Yenta, as I mentioned before, is an application built entirely in 
C++ which uses the ACL to do its communications, and a set 
of home-rolled TCL-like classes to provide the interface. The 
main window of the application is shown in Figure 1. 
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Figure 1- the Yenta “Send” Window 


On the left is a list of all known zones. The magnifying 
glass button will re-load the list of zones which is 
automatically loaded when you run the application. Double- 
clicking on an item in the zone list will cause the program to 
scan that zone for other Yenta applications. If any are found, 
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they are placed in the list on the right side, which tracks the 
names and addresses of all users who you know about on all 
of the zones listed on the left. 

Near the bottom is a scrollable text area in which you can 
type up to 32K of text (can we say TEHandle? I knew you 
could). To send the text to another user(s), you can either 
double-click on a single name in the user list, or shift-click on 
several names and press the send button. If the ‘echo’ 
checkbox is on, your message is placed in a scrolling text-edit 
window (shown in figure 2) along with a log of all your 
incoming messages. 


Messages 


“Message received from Caralyn@CMT at 09:15:20 aM> 
@Hello, Eric. | have sore questions about your Grammar editing software; can | talk to you 
about it sometime today ? 
‘Message received from Eric@HAMMERSCHLAG at 09:19:10 AM> 
@No problern; stop by my office around 3:30 this afternoon. i 





Figure 2. The Yenta “Message Log” Window 


In case you leave your computer for any length of time, a 
feature called AutoReply in the file menu lets you type in a 
string which is echoed back to any other Yenta application 
which sends you a message when AutoReply is active. 

Also available from the File menu is a Preferences dialog 
(shown in figure 3) which lets you give Yenta explicit 
instructions on how to maintain the user list. By default, users 
are added to the list when they send you messages or 
whenever you ask Yenta to scan a zone for new users. In the 
Preferences dialog you can specify a rate at which the 
application should 1) scan all known zones for new users, and 
2) confirm each of the addresses in the right-hand list. Scan 
causes new users to be added to the list automatically, and 
confirm causes them to be removed if they are no longer 
visible on the network. You can also use the Preferences 
dialog to specify a sound to be played when messages are 
received (very useful!) and when a user logs on or logs off 
(marginally useful). 


Play sound on message receipt 
L] Play sound on logon/logoff 


Confirm known users every [2 |minutes 





*] Scan for new users every EM minutes 


. 
EC [ ok | 


Cancel 





Figure 3. The Yenta “Preferences” Dialog 
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REQUIREMENTS 


Yenta is set to run in a 500 K partition, and should function 
properly on any Macintosh running System 7 with program 
linking turned on. 


WHAT'S INVOLVED 

Not much, actually. In order to provide the basic 
communications features of Yenta, I only had to subclass two 
classes in the ACL — CPPReadTask and CPPListenTask. 
Implementing the auto-scan/confirm features required the 
construction of five more descendants of CPPPeriodicTask. 
The interface required about 40 other classes, but I’m not going 
into those in detail here. The approach I will take in going over 
all this is to talk about the two new classes and how they work, 
then show how all of the basic communications classes are used 
in the application. After that I will discuss the periodic task 
classes which implement the scan and confirm features. Figure 4 
presents an overview of the tasks used by the Yenta application, 
which may help you to sort out who is doing what to whom. 


ore ye SteMigen 





CPPConfirmTask CPPYReadTask 





CPPConfirmUsers 





CPPSpawnConfirmTask 
Yenta 





CPPSpawnZone Task 





CPPScanZones 





CPPNode411 CPPWriteTask *n 


(CPPWatchWriteTasks) 


Figure 4. Yenta’s Task Generation Map 


CUSTOMIZING THE ACL 


Back when I was discussing listening, reading, and writing, I 
noted that it could be beneficial to create links between the 
CPPListenTask and CPPReadTask classes so that when a 
listen completed it would spawn a read, and vice versa. That is 
essentially what the two new classes do. As a result, the only 
method we override in each class is DoCompletedAction. 
Both overloaded methods are listed below 


void CPPYListenTask: :DoCompletedAction (void) 
f 
l 


CPPYReadTask *DoRead = NULL; 


CPPListenTask: :DoCompletedAction() ; 
if (this->callResult = noErr) 
DoRead = new CPPYReadTask (this-»ourManager, 15, TRUE); 
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DoRead->StartReadTask(this->sessionID, 100, NULL); 


void CPPYReadTask: :DoCompletedAction (void) 


PPCEndPBRec EndRec; 

] AmITheOwner ; 

CPPYListenTask *LTask = NULL; 

Handle TempHandle = this->GetData (FALSE, &AmITheOwner) ; 


PReadTask: :DoCompletedAction() ; 
alkText- > Append Item (Hand2Ptr (TempHandle)) ; 


Rec.sessRefNum = this->sessionID; // close connection 
is->callResult = PPCEnd (&EndRec, FALSE); 


LTask = new CPPYListenTask od oo 60, TRUE); 


The details of CPPYListenTask’s completion routine are 
fairly intuitive; if the listen task completes successfully it creates 
a new CPPYReadTask and starts it running on that session, 
using a period of 100 ticks. 

The details of CPPYReadTask’s completion routine requires 
a bit more explaining, as it involves classes in other parts of the 
program. gTalkText is a queue which holds pointers to blocks 
of data — in this case messages received by the application. 
DoCompletedAction copies the received data into a pointer 
using Hand2Ptr, then adds it to the ‘received message’ queue. It 
then closes the connection and starts a new CPPYListenTask 
with a 60 tick period to wait for someone else to talk to us. 


How Ir ALL Fits: 

Listening and Reading 

The nice thing about this tight link between the read and 
listen tasks is that once we have opened the communications 
port and posted the first listen task, everything else is done 
automatically; without our ever having to tell it to, the port is 
always engaged in reading or listening. The code which starts 
the whole thing off is part of the s method, and is shown below. 


CPPMaBell *oMaBell; 
CPPTaskManager *gSlaveDriver; 


oMaBell = new CPPMaBell (TRUE) ; 
if ((ErrCode = gMaBell->InitPPCToolbox()) != noErr) 


ErrorAlert (ErrCode, NULL); 
ExitToShell(); 


// create the lookup/read/write task manager 
gSlaveDriver = new CPPTaskManager () ; 


// open the port we will use to communicate through 
if ((ErrCode = gMaBell->OpenCommunicationPort (ObjString, 
gAppName, &gOurPort)) != noErr) 
f 
l 
ErrorAlert (ErrCode, "\pCan't open a port to communicate with."); 
ExitToShell(); 


// Set up a ConnectionTask to handle communications 
LTask = new CPPYListenTask(gSlaveDriver, 60, TRUE); 
LTask->StartListenTask(gOurPort, NULL); 


When the application is shutting down, we simply delete 
gSlaveDriver — which causes any outstanding tasks to be 


YENTA AND THE APPLETALK CLASS LIBRARY 


TASTES LIKE CHICKEN: 





Without secure software, even the most expensive 


baranare key is nothing but a chew toy. 


















They're wrong. 


or expensive chew toys. 


aborted and deleted, closes gOurPort, and deletes gMaBell 
to shut down Appletalk. 


Writing 

Writing data to other users is also a fairly simple process. 
All writing is done from the ‘Send’ window, so I created a 
method within it called SendToUser, the details of which are 
shown below. 


void CPPSendWindow: :SendToUser (Ptr Text, Boolean ownsData, 
ADD 0 


CPPNodeInfo *SendT 


// have the write task open the connection 


TheTask = new CPPWriteTask (gSlaveDriver, 25, TRUE); 
TheTask->StartWriteTask (gOurPort, SendTo, T 
NULL, (OSType)'TEXT', (OSType) 'YntA'): 


SendToUser simply creates a CPPWriteTask and uses 
the ‘automatic connect’ version of StartWriteTask to send 
the data to the specified user. 

sendToUser is used by two other methods within 
CPPSendWindow — the method which responds to the user 
pressing the send button, and the method which sends the 
AutoReply string back to someone who sends us a message. 
Looking at these two methods will complete our coverage of 
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Protection is only as effective as the software involved. Most hardware key 
vendors require that you, the developer, spend major resources protecting 
and obscuring the code which interacts with a key. Without this effort on 
our part, your software is vulnerable, even to inexperienced hackers. 


At PACE, we understand that software is the most important 
component of a working protection system. For more than a 
decade we've developed low cost and secure software based 
protection schemes. Our MacEncrypt system will turnkey 
protect your application automatically, applying multiple layers of PACE 
proprietary encryption and self checking algorithms to your product. 


MacEncrypt is a secure, flexible, compatible and low cost protection 
investment. No false promises, wasted development time, upset users 


Trust the protection of your software to the people who understand 
software. Call today to order your PACE Developers Kit. 


PACE Anti-Piracy 1082 Glen Echo Ave., San Jose, CA 95125 
Vox: (408) 297-7444 * Fax: (408) 297-7441 © AppleLink: PACE.AP 
email: info@paceap.com * Web page: http://paceap.com/pace.html 


Oo 
Bien 
Bh You need to protect your software. Hardware vendors will try to convince 


you that hardware keys are the only secure method of protection. 


Lae Re 


“Our Japanese font supplier imposes 
strict copy-protection obligations 
on Adobe Systems. Because of this, 
we have been using PACE software 
protection on Adobe Type Manager, 
Japanese version and our other 
Japanese font products for almost 
5 years. PACE’s software solution 
provides us with effective security at 
a low cost. Our working relationship 
with PACE is excellent and 
their expert technical staff has 
always been helpful.” 


Paul Anderson 
Senior Director, Pacific Rim 
Adobe Systems, Inc. 


how writing is done within Yenta. Let’s look at the AutoReply 
method first: 


void CPPSendWindow: :GotNewMessage (CPPNodeInfo *FromWhom) 
f 
U 


ror TempPtr, OurIDStream; 
OSErr ErrCode; 


// send a message if feature is on 

if (gReplyString) 
// Create a string V with our name and address in it 
Our[IDStream = gOurIdentity->InfoToStream(); 


// create a pointer to hold our address & the reply string 


TempPtr = NewPtr (GetPtrSize(OurIDStream) 
+ gReplyString[0]); 
if ((ErrCode = MemError()) == noErr) 
( 
BlockMove (OurIDStream, TempPtr,GetPtrSize(OurIDStream)): 


BlockMove (gReplyStringtl, 
“TempPtr+GetPtrSize(Ourl DStream) , 
*gReplyString) ; 

(OurIDStream) ; 


Di e 
Ne annnuDex 
VISDOSrtr 


// send the autoreply to the user who sent us the message 
endToUser (TempPtr, TRUE, FromWhom); 

| 

J 


| 
J 


// Add the user to the list 
if (this->UserList->AddNewUser (FromWhom) ) 
if (gPrefsInfo.playLogon) 
gLogonSound- PI aySound (TRUE) ; 
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This method is called every time a message is taken from the 
message queue. The first part checks a StringPtr called 
geReplyString; if AutoReply is turned on, gReplyString 
points to the AutoReply message, otherwise it is NULL. 
Because the standard format for Yenta messages requires that 
the address of the sender be included with the message, we 
first use CPPNodeInfo’s InfoToStream method to convert 
our address to a pointer, copy the string and the address into 
another pointer, then ask SendToUser to deliver the message. 
Note that the write task is given the responsibility for deleting 
the pointer when it completes. 

The method which responds to the user pressing the send 
button is named (rather predictably) DoSendButton. The first 
part of the method collects information about the text to be 
sent, then constructs the message, storing it in a variable called 
TempPtr. It also stores the total number of selected users in 
the variable NumToSendTo, then enters the following loop: 


// send text to each hilighted user 
while (this->UserList->NextSelectedCell (&whichUser) ) 


if 
l 


UserData = (CPPNodeInfo *) ((*this->UserList) [whichUser]); 
if (UserData && !(UserData->Equals(gOurIdentity) ) ) 
SendToUser (TempPtr, NumToSendTo == 1, UserData) ; 


| 
J 


Each selected user’s CPPNodelInfo object is extracted from the 
user list, and the data sent to each of them using the 
SendToUser method. Note that the write task is only given 
permission to dispose of the data if there is one user selected. 

When you send to more than one user, the matter of 
disposing of the write data becomes a bit more complicated, 
because there are no hard-and-fast rules for determining which 
write task should actually be given permission to dispose of the 
data. You can’t give permission to any one task in particular, 
since you have no guarantee that any particular task will 
complete after all of the others. Similarly, you can’t let the 
application dispose of the memory directly after the loop, since 
not all the tasks may have completed by then. You could create 
a copy of the data for each user and give each task ownership 
of its copy, but consider the problem of sending 10K of data to 
50 users; you tend to run out of memory rather quickly. 

The solution which I came up with was to create a 
subclass of CPPPeriodicTask which could hold on to the 
data pointer, and wait for all of the write tasks to complete 
before disposing of it. This class, called 
CPPWatchWriteTasks, accomplishes this task by calling its 
PTM’s HowManyTasksOfType method with the name 
“CPPWriteTask” until the count reaches zero, then completing 
and deleting the pointer it was given. The following fragment 
comes directly after the ‘send’ loop shown above: 


// keep track of 'write' data until all tasks complete 
if (NumToSendTo != 1) 


- WatchTask = new CPPWatchWriteTasks (gSlaveDriver, 60); 
WatchTask->StartWatchTask(TempPtr) ; 


| 
J 
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THE FINAL PIECES 


The last two features to discuss are the program’s ability to 
automatically scan known zones for new users and to confirm 
the presence of known users. Each of these features required 
the creation of two subclasses of CPPPeriodicTask: one 
which does the actual work, and the other which simply 
triggers it every n minutes. Let’s look at the details of the 
trigger classes first. 

There are two trigger classes - CPPSpawnZoneTask and 
CPPSpawnConfirmTask. Each class has three elements in 
common: 1) a private variable of the type task it triggers 
(CPPScanZones or CPPConfirmUsers respectively), 2) a 
Start??? method which initializes the private variable and 
enqueues the task, and 3) a DoPeriodicTask method which, 
when called, calls Start??? on that private variable. Below 
is the code for one of their DoPeriodicTask methods; the 
other is identical in style. 


void CPPSpawnZoneTask: :DoPeriodicAction (void) 
/° if the Scan task has completed, ask it to scan again; */ 


// call the inherited method to update frequency count 

CPPPeriodicTask: :DoPeriodicAction(); 

if (scanTask->hasCompleted) 
scanTask->StartScanZones (NULL) ; 


A key feature of both trigger tasks is that they never complete. 
(What, never? No, never!) Both of them remain in the queue 
until they are either explicitly removed or until the application 
shuts down. Boring, but useful. Time to move on to the 
gruntwork classes - CPPScanZones and CPPConfirmUsers. 


CPPSCANZONES 
CPPScanZones is a fairly unassuming descendant of 
CPPPeriodicTask. It has a single unique method — 
StartScanZones, and three private variables, shown below: 


class CPPScanZones : public CPPPeriodicTask { 


public: 

void StartScanZones (CompletionProc DoProc); 
private: 

CPPStringList *zoneList; 

CPPNode4l1l1 *lookupTask; 

long whichZone; 


hs 


When StartScanZones is called, it copies the list of 
zones in the Send window into the zoneList variable, 
allocates the lookupTask object, and sets whichZone to lL. 
Its DoPeriodicTask method looks like this: 


void CPPScanZones: :DoPeriodicAction (void) 
/* if the lookup has completed, advance to the next zone and start another lookup */ 


StringPtr ZoneName; 
Str32 Typestr; 
str255 STemp ; 


// call the inherited method to update frequency count 
CPPPeriodicTask: :DoPeriodicAction() ; 


if (lookupTask->hasCompleted) 
( 
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this->whichZonet+; 
if (this->whichZone <= this->zoneList->GetNumItems()) 
{ 
ZoneName = (*zoneList) [this->whichZone] ; 
PStrCat (32, TypeStr, 2, "\p*e", gAppName) ; 
lookupTask->StartNodeLookup("\p=", TypeStr, 
ZoneName, 50, ProcessNodeLookupResults) ; 
PStrCat (255, STemp, 3, "\pScanning zone '", 
ZoneName, "\p' for new users."); 
SetStatusMessage (STemp, TRUE); 


else 
f 
l 
this->hasCompleted = TRUE; 
this->callResult = noErr; 
} 
J 


At each iteration, it gets the name of the next zone in the 
list and starts the CPPNode411 task looking for all objects in 
that zone which match the ACL naming convention, using the 
application name as the PortType (see the discussion of 
CPPMaBell’s OpenCommunicationPort method). The 
global routine ProcessNodeLookupResults takes each 
node in the ‘found’ list and passes it to the user list, which then 
determines whether the node is already in the list or not. 


CPPCONFIRMUSERS 
CPPConfirmUsers is also a fairly unassuming task, with a 


declaration similar to that of CPPScanZones: 
class CPPConfirmUsers : public CPPPeriodicTask { 
public: 


void StartConfirmUsers (CompletionProc DoProc): 
private: 

CPPObjectList ‘*nodeList; 

CPPConfirmTask *confirmTask; 

long whichNode; 
1. 


Jos 


StartConfirmUsers copies the list of known addresses 
from the Send window into the nodeList variable, allocates 
the confirmTask object, and sets whichNode to 1. It’s 
DoPeriodicTask method follows: 


void CPPConfirmUsers: :DoPeriodicAction (void) 
f 
\ 

CPPNodeInfo *TheNode = NULL: 

Dtb2Jo STemp ; 

StringPtr UsersName; 


CPPPeriodicTask: :DoPeriodicAction(); 


if (confirmTask->hasCompleted) 
{ 
this->whichNodet+; 
if (this->whichNode <= gUserList->GetNumItems ()) 
( 
TheNode = (CPPNodeInfo *) ((*gUserList) [whichNode]); 


// tell the user we are confirming this connection 

UsersName = ShortName (TheNode); 

PStrCat (255, STemp, 2, "\pSearching for ", UsersNam 
SetStatusMessage (STemp, TRUE); 

NukePtr (UsersName) ; 


confirmTask->StartNodeConfirm(TheNode, 


ConfirmCompletionProc) ; 
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else 


this->hasCompleted = TRUE: 
this->callResult = noErr; 


J 


In a manner similar to CPPScanZones, it iterates through its list, 
extracting each user address in turn and activating the confirm 
task. Note that it assigns a completion routine to 
CPPConfirmTask. This is done primarily so that we don’t have 
to create a specific subclass of CPPConfirmTask. The 
completion routine simply asks the user list to delete the specified 
user if the NodeExists method returns FALSE (indicating that 
the confirm task failed to find the user on the network). 


IN CONCLUSION 

Believe it or not, we’re done. As promised, I haven’t discussed 
any of the interface classes/application framework which I used 
to put Yenta together. If you are comfortable with the TCL, you 
probably needn’t bother, unless you want to work entirely in 
C++. If, like me, you find the TCL a bit baroque and unintuitive, 
you might want to look over the classes I've constructed. They 
don’t provide as many fancy features as the TCL (embedded 
scrolling panes, etc.) but most of the classes map pretty directly 
onto the Macintosh user interface, which I think makes it easier 
to use. If there is enough interest, I may discuss parts of it at a 
later date. If anyone finds any bugs (bound to be in there, 
somewhere!), or comes up with any neat classes which add 
functionality to either the ACL or my interface class library, 
please snail/e-mail me and let me know. Feel free to modify, 
subclass, and experiment like mad. Good hacking to you all! 
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editor to create application resources that look like native 
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mance using the Visual C++ optimizing C/C++ compiler. 
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development for Windows. subscription FREE with purchase of this » 3-year limited warranty* 
Included is the Microsoft Developer system. | » Microsoft Windows NT Workstation 
Network, an annual membership pro-' With these subscriptions you will get V3.5 
gram that delivers every single bit and the Windows 95 SDK and Windows 95 a f barchia. 3 
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5 = In Canada, call: 800-668-3021 Mon-Fri, 7am-9pm Central Time 
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| USA LP. 2214 W Braker Lane Bldg 3, Austin TX 78758-4053 Attn: Warranty. Pentium is a trademark of Intel Corporation. Dell disclaims proprietary interest in the marks and names of others. 























By Harry Haddon, Franklin & Marshall College 


Fixing a minor bug gets 


your priorities straight 


Just like most standard Macintosh 
programs, MacApp has a main event 
loop, but as with many things, MacApp 
handles the gory details of the event 
loop for you while still giving you the 
flexibility to expand or improve upon it 
as needed. The focus of MacApp’s 
event loop is MacApp’s event list which 
usually contains commands but can also 
contain more generalized events. 
Commands and events posted to this list 
can have different priorities to change 
the order in which they are processed. 
The only problem is that MacApp 3.0 
and 3.1 never actually process your low 
priority events. 

This article gives a quick overview 
of the MacApp event list, explains why 
you might want to use an event with a 
low priority, and tells you how to fix 
MacApp-without modifying the MacApp 
source-so low priority events are 
properly processed. 


INSIDE THE EVENT LIST 
The MacApp event list is of type 
TEventList and is a data member, named 
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fEventList, of TApplication. TEventList contains objects of type 
TEvent and objects descended from TEvent including objects of 
type TCommand. Since TCommand is a descendent of TEvent, 
I will use the word “events” in this article to refer to both events 
and commands. 

When you call PostAnEvent() or PostCommandQ(, the 
TEventHandler implementations of these two methods pass the 
event to the next event handler in the event handler chain until 
TApplication::PostAnEvent() gets the event and inserts it in 
fEventList sorted by priority. TApplication’s main event loop 
method retrieves events from fEventList and handles the events 
by calling their Process) method. The highest priority events, 
those with their fPriority field set to kPriorityHighest, are 
retrieved before the lower priority ones. The priorities defined 
by MacApp are: 

// Low priority commands are considered last 

const short kPriorityLowest = 127; 

const short kPriorityLow = kPriorityLowest - 32; 
// Normal priority: command default priority 

const short kPriorityNormal = 64; 

const short kPriorityHigh = kPriorityNormal - 32; 


//High priority commands take precedence 
const short kPriorityHighest = 0; 


If you wish you can use priority values which are between 
these constants. The default priority for events is 
kPriorityNormal. 

Events of equal priority in fEventList are not necessarily 
processed on a First-In, First-Out basis. MacApp uses a binary 
search when inserting events in fEventList and inserts the event 
at the first event it finds of equal priority. If you post an event 
and there are already two or more events of equal priority in the 
list, their order in the list is indeterminate and hence their order 
of processing is indeterminate. This is not normally a problem 
since the typical MacApp application does not have that many 
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equal priority events in the list at one time, but it is something 
to consider if you're posting multiple commands to the list at the 
same time and the order of processing is important. 

One command you'll always find in fEventList is the 
TEventRetrieverCommand that MacApp uses to fetch toolbox 
events from the toolbox’s Event Manager. The initialization 
method IApplicationO creates this command with a priority of 
kPriorityLow and posts it to fEventList. The command stays in 
the list as long as the application is running, and its sole job is 
to check for toolbox events. Since TEventRetrieverCommand 
has a lower priority than normal, MacApp does not process it 
until after it processes the events in the list that have a normal 
priority. Thus MacApp won't fetch any more events from the 
toolbox queue until after it has processed all of the normal 
priority events and commands in fEventList. 

TEventRetrieverCommand::DolItQ checks for toolbox 
events by calling gApplication->PollToolboxEventQ which calls 
the toolbox trap WaitNextEventQ. If a toolbox event is 
available, it is encapsulated in a TToolboxEvent and processed 
by MacApp. If no toolbox event is available and 
TApplication.fAllowApplicationToSleep is true, MacApp figures 
out the various sleep parameters such as the sleep time and 
calls WaitNextEventQ to wait for the next toolbox event. 

This all works great unless you try to post an event with a 
priority of kPriorityLow or lower. Then you will find that the 
TEventRetrieverCommand in fEventList acts as a road block for 
low priority events. Because it was posted first, it is processed 
before all events of the same priority (kPriorityLow). If no toolbox 
events are available from the Macintosh event queue, the 
TEventRetrieverCommand puts the application to sleep, preventing 
the processing of any low priority events remaining in fEventList. 
If a toolbox event is available, MacApp processes it, as it should, 
leaving no opportunity for the processing of low priority events. 


Wuy UsE Low Priority EVENTS? 

I ran into the bug with low priority events when I was 
developing a client application that fetches data from a server 
application. I used a descendent of TClientCommand, 
MacApp’s class for sending an Apple event and processing its 
reply, to fetch the data from the server. The server collects 
new data at the rate of 10 samples per second and the client 
needs to be updated at least several times a second so as soon 
as a reply is received, the client posts another TClientCommand 
to fetch the next chunk of data. 

My TClientCommand needed to be a lower priority than 
toolbox events so that the view that was changed by the 
TClientCommand would be updated via an update event before 
the next TClientCommand was processed. I also wanted the 
application to process toolbox events before it did the 
TClientCommand so that the application would be responsive 
to user actions such as mouse clicks. Experimentation with the 
TClientCommand’s priority set to kPriorityNormal on a slower 
Macintosh confirmed that being able to set its priority lower 
was a worthy goal. 
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You may have a similar situation where a low priority 
command would fit the bill. Remember that low priority 
commands really aren’t background or idle commands: they do 
not execute until after higher priority events have executed, but 
once they begin execution they can hog CPU cycles as much as 
any other event. If they take too much time to execute they 
can slow down the processing of user actions and create a less 
than enjoyable experience for your user. Design your 
commands accordingly. 


FIXING THE LOW PRIORITY EVENT BUG 

I came up with a fairly simple fix that I have used with MacApp 
3.0.1. This fix will probably also work with 3.1, since it 
appears that the relevant sections of code have not changed 
from 3.0 to 3.1. It is not a perfect fix in that events with the 
very lowest priority, kPriorityLowest, are still not processed, but 
this is not really a problem since you can use a priority of 
kPriorityLowest-1 for your lowest priority, and it will work fine. 

The original TEventRetrieverCommand, which is installed 
by Application, is left in fEventList but its priority is changed to 
kPriorityLowest. This still allows the application to sleep-a 
Good Thing in the Macintosh world of cooperative multi- 
tasking-but it does not go to sleep until after all other 
commands are given a chance to execute. I changed the 
priority of TEventRetrieverCommand in IMyApplicationQ after 
calling [ApplicationOQ: 
TEventRetrieverCommand *originalEventRetriever; 


originalEventRetriever = 


(TEventRetrieverCommand * EventList->At(1); 


originalEventRetriever->fPriority = kPriorityLowest; 





if (qDebug && !originalEventRetriever->IsMemberClass ( 
GetClassIDFromName("TEventRetrieverCommand") ) ) 
ProgramBreak("First command in fEventList is not \ 
a TEventRetrieverCommand!"); 





This code doesn’t look for the TEventRetrieverCommand 
on the event list but just assumes that it's the first command on 
the list. The debug check will warn me if this isn’t true in 
future versions of MacApp. (Hopefully Apple will fix this in 
MacApp 3.5 and we won't need this fix at all anymore.) 

To keep processing toolbox events at kPriorityLow, I 
declared a new command that is a descendant of 
TEventRetrievercommand. This command checks for toolbox 
events but never sleeps. It is posted at kPriorityLow to replace 
the original TEventRetrieverCommand that was demoted to 
kPriorityLowest. 


public TEventRetrieverCommand { 


public: 
TNoSleepEventRetrieverCommand(); 
// Empty constructor to satisfy compiler. 


virtual pascal void INoSleepEventRetrieverCommand ( 
CommandNumber itsCommandNumber) ; 
// Initialize the EventCommand procedurally. 
virtual pascal Boolean IsReadyToExecute(); 
// override 
// Return true when event available 
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virtual pascal void DoIt(); 
// Retrieve and process an event without sleeping 


\ 
Jos 


I put the declaration for TNoSleepEventRetrieverCommand 
in the header file that contains the declaration for 
TMyApplication. 

I put the definitions for its methods in the .cp file that 
contains the methods of TMyApplication. The initialization 
method INoSleepEventRetrieverCcommand() just calls 
[EventRetrieverCcommand() and then sets the command's 
priority: 
pragma segment ASelCommand 
pascal void 
TNoSleepEventRetrieverCommand: : INoSleepEventRetrieverCommand ( 


CommandNumber itsCommandNumber) 











this->IlEventRetrieverCommand (itsCommandNumber) ;: 


// Let more important stuff happen first 
fPriority = kPriorityLow; 


Its IsReadyToExecute method returns true whenever a 
toolbox event is available: 


pragma segment ARes 
pascal Boolean 
TNoSleepEventRetrieverCommand: : IsReadyToExecute() 
if 
l 

EventRecord theEvent; 
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return EventAvail(gApplication->fMainEventMask, theEvent) ; 


When IsReadyToExecuteQ returns true, MacApp calls the 
command’s DolItQ method. The DoltQ — for 
TNoSleepEventRetrieverCommand is just like DolItQ for 
TEventRetrieverCcommand except it calls PollToolboxEventQ) 
with the parameter allowApplicationToSleep set to false so the 
application doesn’t go to sleep on us: 


rag 
5 
asca 


a) 
a 


ma segment ASelCommand 
1 void TNoSleepEventRetrieverCommand: :DoIt() 


| gApplication->PollToolboxEvent (FALSE) ; 
// FALSE = never sleep 


The TNoSleepEventRetrieverCommand is created and 
posted in TMyApplication after the priority of the original 
TEventRetrieverCommand is changed: 
TNoSleepEventRetrieverCommand *aEventCommand = 

new TNoSleepEventRetrieverCommand; 


aEventCommand ->INoSleepEventRetrieverCommand (cNoCommand) ; 
this->PostAnEvent (aEventCommand) ; 


That’s it. With these fixes in place you can post a 
command with a priority of kPriorityLow or lower, and MacApp 
will process it as it should. 





UsING Low PRIORITY EVENTS 








by Steve Jasik, Menlo Park, CA, macnosy@netcom.com 


ResError Considered 
Harmful? 


Nosy is over 10 years old, having been 
introduced to the world in Nov °84 and 
first shipped in Jan ’85. It has been a 
few years since I have written an article 
for MacTech. Since ’84, the Mac has 
become more powerful than the 
mainframes I used to work on, and the 
system has advanced in utility and 
complexity. Nosy hasn’t changed too 
much, and some pseudo alternatives to 
it, such as the ResEdit CODE Editor have 
come along, but I used it recently to get 
the global view of a piece of the ROM. 

The particular example I'll show 
here came to me as a bug in my 
debugger that showed up on a IIfx 
running System 7.5. After some 
investigation, it turned out that the 
problem was some less-than-robust code 
in Sound Manager 3.0. The crux of the 
problem was that, despite what Inside 
Macintosh or today’s equivalent of it 
says, the Resource Manager doesn’t 
always return a non-zero value of ResErr 
when it doesn’t find a requested 
resource. More on this later. 

The original problem presented to 
me was that a user was trying to debug 
an INIT and my debugger was barfing. 
To find the bug, I set up my normal 
debugger bug-finding environment, in 
which I run two copies of my Debugger. 

The first one debugs the second 
one, and if both fail, I have Macsbug 
running “behind” the first one. For the 
curious, the magic behind having one 
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debugger debug a second copy of itself is to do a complete 
context switch of low memory, which includes the exception 
vectors (0-$FF) and the Macintosh globals ($100-$1E00) when 
entering The Debugger. 

Using this method, I found that someone was trying to do a 
_CloseResFile on me. It took a few hours to trace it back into 
the Sound Manager. 

At this point let me mention a trick I have used over the 
years to get a better grip on where one is in a random blowup. 
One of the most important pieces of information is the stack 
crawl. It answers the question of how and sometimes why the 
program is where it is. Many times the stack crawl is less than 
informative, and those who use Macsbug know well that the 
ROM part of it can be useless. Given this, how can we recover 
any information about how the program got to the point it is 
currently at? The basic answer is to try and repair the current 


66 Search your code for ResError calls 
and convince yourself 
that they serve some purpose... 
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address/bus error by fixing up a register or so (e.g. by putting 
$0 or $40801000 into the register which has a bus error value 
that the current instruction is attempting to read from or write 
to), advancing the Program Counter, and then carefully single 
stepping our way out of the current procedure and ‘up the 
stack’ so we can get an idea of where we came from. 

In this case, this method worked for me, and I found 
myself in Sound Manager code, so the next problem was to get 
a decent disassembly of it so I could figure out why it was 
trying to do a CloseResFile. 

After some disassembly work in Nosy, I found myself 
staring at the following two procedures, one which I have 
named open_Snd_Prefs : 





open_Snd_Prefs 


B1B10: 4E56 FFB4 'NV..! LINK A6,#-S4C 
B1B14: 48E7 0308 "Hw! MOVEM.L D6-D7/A4, - (A7) 
B1B18: 598F ry! SUBQ.L #4,A7 


BIBIA: 2F3C 5354 5220 "/<STR * PUSH.L #'STR ! 
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You Can't Buy This CD 
in any Store 


More than 30 popular SDKs—one low price 


What’s the easiest and least costly 
way to make the most of the new 
features enabled by Macintosh 
system software extensions? 

In a word (or five), the Mac” 
OS Software Developer's Kit (SDK). 

The Mac OS SDK helps you 
support the entire Mac OS family, 


You won't find this special 
Mac OS SDK in any store or catalog. 
It’s available only from APDA, Apple’s 
source for development tools. Nor will 
you be left on your own as soon as you 
make the purchase. Every quarter you'll 
receive an automatic update—ensuring 
you always have the most current 





by offering instant access to more Mac OS | information as well as an understanding 
than 30 of Apple’s most proven Software Developer's Kit : of how to add support for advanced 
and popular SDKs. And whereas system extensions in your software. 
these SDKs previously sold separately for nearly $2,000, A typical SDK provides the system software extension; 
now you can have them all on one CD—for a one-year programming interfaces and libraries; sample code; and 
subscription price of only $299. technical documentation. Here’s a listing of the SDKs that 


are included in your first CD mailing: 





Apple Guide AppleTalk Wide Area Macintosh Easy Open Open Transport 

Apple Open Collaboration ColorSync MacODBC PlainTalk 
Environment (AOCE) Communications Toolbox MacOSI Connection QuickDraw GX 

Apple Remote Access Control Strip MacSNMP QuickTime 

Apple Remote Access Modem —_ Designing PCI Cards & MacI'CP d 

Apple Shared Library Manager _ Drivers MacX.400 Sound Manager 

AppleScript File System Manager MacX25 Telephone Manager 

AppleSearch Installer MIDI Management Tools Thread Manager 

AppleShare API Macintosh Drag and Drop Network Software Installer XTND 





How to Order Mac OS SDK To order by mail: send a check or money order for $299 payable to 


To order by phone: call 1-800-282-2732 (U.S.) APDA/Apple Computer, Inc., plus sales tax and $20 for shipping and 
1-800-637-0029 (Canada), or (716) 871-6555 (International) handling (for U.S. orders) to: APDA, Apple Computer, Inc., P.O. Box 
Monday through Friday, 7am to 5pm PST. 319, Buffalo, NY 14207-0319. For international orders, please call APDA for 
ROGO3ZLL/A $299 per annual subscription (four mailings). shipping and handling charges. Allow 5-10 days for delivery within the U.S. 


© 1995 Apple Computer, Inc. Apple and the Apple logo are registered trademarks of Apple Computer, Inc. Product and pricing subject to change without notice. 
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B1B20: 3F3C BF48 '9< i! PUSH #SBE48 
B1B24: A9AO Cease _GetResource 
; (theType:ResType; ID:INTEGER):Handle 
B1B26: 285F i Cae POP.L A4 
B1B28: 200C rot MOVE.L A4,DO 
B1B2A: 660A 10B1B36 BNE.S  mnn_l 
B1B2C: 558F 'U.! SUBQ.L #2,A7 
BIB2E: A9QAF ar _ResError ;:OSErr 
B1B30: 3E1F 1! POP D7 
: ROM returns ResErr = 0 !! ***** 
B1B32: 6000 0094 10B1BC8 BRA mnn_4 
no error from RsrcMgr, so we exit with DO = 0, but we haven't opened the Prefs file!!! 
B1B36: 558F 'U.! mnn_1 SUBQ.L #2,A7 
B1B38: 3F3C 8000 ae PUSH #58000 
B1B3C: 2F3C 7072 6566 '/<pref' PUSH.L #'pref' 
B1B42: 7001 ‘p" MOVEQ  #1,D0 
B1B44: 1F00 mot PUSH.B DO 
B1B46: 486E FFFE 200FFFE PEA wnn_4(A6) 
BIB4A: 486E FFFA 200FFFA PEA wnn_3(A6) 
BIB4E: 7000 'pb,! MOVEQ  #0,D0 
B1B50: A823 ve _AliasMgr 
: (DO/selector:INTEGER) 
B1B52: 3E1F 1! POP D7 
BIB54: 6672 10B1BC8 BNE.S  mnn_4 
B1B56: 204C ' yt MOVEA.L A4,A0 
B1B58: A029 ryt _HLock  ; (A0/h:Handle) 
BIB5A: 558F "UL! SUBQ.L #2,A7 
BIB5SC: 3F2E FFFE 200FFFE PUSH wnn_4(A6) 
B1B60: 2F2E FFFA 200FFFA PUSH.L wnn_3(A6) 
B1B64: 2F14 r/ it PUSH.L (A4) 
B1B66: 486E FFB4 200FFB4 PEA wnn_2(A6) 
BIB6A: 303C 0001 'O<. .! MOVE #1,D0 
BIB6E: AA52 ' OR! _HighLvlFSDisptch 
:(D0/selector:INTEGER) 
BIB7O: 3E1F mo! POP D7 
B1B72: OC47 FFD5 Ce" CMPI #-43,D7 
B1B76: 6622 10B1B9A BNE.S  mnn_2 
B1B78: 4A2E OOOB 200000B TST.B  param2(A6) 
BIB7C: 671C 10B1B9A BEQ.S  mnn_2 
BIB7E: 486E FFB4 200FFB4 PEA wnn_2(A6) 
B1B82: 2F3C 7361 6420 '/<sad ! PUSH.L #'sad ' 
B1B88: 2F3C 7072 6566 '/<pref' PUSH.L #'pref! 
BIB8E: 70FF In! MOVEQ #-1,D0 
B1B90: 3F00 19 PUSH DO 
B1B92: 303C OOOE 'O<,.! MOVE #14,D0 
B1B96: AA52 ' OR! _HighLvlFSDisptch 
B1B98: 4247 'BG! CLR D7 
BIB9A: 4A47 'JG! mnn_2 TST D7 
BIB9C: 662A 10B1BC8 BNE.S  mnn_4 
BIBOE: 558F "UL! SUBQ.L #2,A7 
BIBAO: 486E FFB4 200FFB4 PEA wnn_2 (A6) 
BIBA4: 7003 'pb,! MOVEQ #3,D0 
B1BA6: 1F00 at PUSH.B DO 
B1BA8: 303C OOOD "OX. MOVE #13,D0 
BIBAC: AA52 oR! _HighLvlFSDisptch 
BIBAE: 3C1F . POP D6 
BIBBO: OC46 FFFF ‘FL! CMPI #-1,D6 
BIBB4: 6608 10B1BBE BNE.S  mnn_3 
BIBB6: 558F 'U.! SUBQ.L #2,A7 
B1BB8: A9QAF an _ResError ;:OSEtr 
BIBBA: 3E1F rt POP D7 
BIBBC: 600A 10B1BC8 BRA.S  mnn_4 
BIBBE: 206E 0OOC 200000C mnn_3 MOVEA.L param (A6) ,A0 
B1BC2: 3086 'O,! MOVE D6, (AO) 
B1BC4: 7000 ores MOVEQ  #0,D0 
B1BC6: 6002 10B1BCA BRA.S = mnn_5 
B1BC8: 3007 'O.! mnn_4 MOVE D7,D0 
BIBCA: 4CEE 10CO FFA8 200FFA8 mnn_5 
MOVEM.L wnn_1(A6) ,D6-D7/A4 
BIBDO: 4E5E "NA! UNLK A6 
BIBD2: 4E75 "Nu! RTS 
BICA6: 4E56 FFFE 'NV..'  proc4742 LINK A6,#-2 
BICAA: 48E7 0738 'H. 8! 
MOVEM.L D5-D7/A2-A4, - (A7) 
BICAE: 246E 000C 200000C MOVEA.L param2(A6) ,A2 
BICB2: 266E 0008 2000008 MOVEA.L param3(A6) ,A3 
B1CB6: 7000 'p.! MOVEQ #0,D0 
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: 486E FFFE 


| 4EBA FE36 


3D47 0014 


2F2E 0010 


3E3C FF40 


3E38 0220 





: 3E38 0220 


> 3F2E FEFE 








3D47 0014 


: 4ES5E 
: 205F 
: 4FEF 0O00C 
: 4EDO 





: 4CEE 1CE0O FFE6 


boot 
'y.! 
10B1CC2 
Vt 


10B1D36 


! ! 


10B1CCA 


'~ 1 


10B1D36 


‘4 
Ere 
200FFFE 
a ae 
10B1B10 
! 
'po! 
1OB1CEC 


"9 ! 
! ! 


2000014 
10B1D3A 


ty! 
2000010 
r/o 


a 
'y.! 
So 


10B1DOC 


'JG' 
1OB1D2C 
'><.@! 
10B1D2C 


' ZL! 
Y et 


x ! 


$220 
1OB1D2C 
! K! 


ae 


$220 
1OB1D2C 
! T! 
nas! 


200FFFE 
m9) 
2000014 
200FFE6 
"NA! 


'O...! 
'N.! 


mnq_l 


mnq_2 


MOVE.B  (A2),D0 
TST.L DO 
BNE.S mnq_l 
MOVEQ #-50,D7 
BRA.S  mnq_6 
MOVE.L A3,D0 
BNE.S mnq_2 
MOVEQ  ##-50,D7 
BRA.S  mnq_6 








SUBQ.L  #2,A7 
_CurResFile ;:RefNum 
POP D6 
PEA wnq_2(A6) 
MOVEQ #0, D0 
PUSH.L DO 
JSR open_Snd_Prefs 
MOVE DO,D/ 
ADDQ #8, A7 
BEQ.S mnq_3 

; if no error then get 'sysb' resource 
PUSH D6 
_UseResFile 

: (frefNum:RefNum) 


mnq_3 


MOVE D7,funRslt (A6) 
BRA.S = mnq_/7 


SUBQ.L #4,A7 
PUSH.L_ paraml (A6) 
PUSH.L A2 
_GetlNamedResource 


; (theType:ResType; name:Str255):Handle 


POP..L A4 

SUBQ.L #2,A7 
_ResError ; :OSErr 
POP D7 
MOVE.L A4,DO 
BNE.S mnq_4 


; oops, didn't get it, close the res file 


mnq_4 


mnq_5 


mnq_6 


mnq_/ 





TST D7 

BNE.S mnq_5 
MOVE  #SFF40,D7 
BRA.S = mnq_5 


MOVEA.L A4,A0 
_GetHandleSize 
:(A0/h:Handle):DO\Size 

MOVE.L DO,D5 

MOVE MemErr,D/ 
BNE.S mnq_5 
MOVEA.L A3,A0 

MOVE.L D5,D0 
_SetHandleSize 


:(A0/h:Handle; DO/newSize:Size) 


MOVE MemErr,D/ 
BNE.S mnq_5 
MOVEA.L (A4) , AO 
MOVEA.L (A3),Al 
MOVE.L D5,D0 
_BlockMove 
:(A0/srcPtr,A1/destPtr:Ptr; 

PUSH — wnq_2(A6) 
_CloseResFile 

: (refNum:RefNum) 
PUSH D6 
_UseResFile 

; (frefNum:RefNum) 


MOVE D7,funRslt(A6) 


MOVEM.L q_1(A6) ,D5-D7/A2-A4 


UNLK A6 

POP.L AO 

LEA 12(A7) ,A7 
JMP (AO) 


Referring to the procedure I named open_Snd_Prefs, it sets 
up a Link frame and calls _GetResource to get the value of a 
STR ' resource with id = BF48. I rummaged around the System 
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file in Resorcerer and found that this string had the value of 
“Sound Prefs”. The code then checks to see that it gets the 
string, and the rest of the procedure uses the Alias Mgr, etc to 
attempt to find its prefs file somewhere in the system folder. 
Apparently this procedure exits with 0 if it has found and 
opened the prefs file or a non-zero return when it has not. The 
caller futzes around to get the value of some magic resource 
from it and then closes the prefs file via _CloseResFile. So how, 
you may ask, could anything go wrong with this simple code? 

Well, my debugger disconnects itself from the System file. 
That is, inside my Debugger, the System file is not on the chain of 
resource files to be searched, and, in almost all cases, it contains 
copies of the necessary resources that would normally come from 
the System file. The reason for this is that an open resource file 
contains a field for each resource that points to the copy of it in 
memory when the resource is opened. In order to avoid having 
to switch the values of these fields when transitioning between 
The Debugger and user, I chose the time efficient method of 
duplicating the necessary resources inside my debugger. 

With this fact in hand, lets look at open_Snd_Prefs again. 
In C the source code would look like: 





OSErr open_Snd_Prefs() { 
handle h = GetResource('STR ',SBF48); // get name of Sound Prefs file 
if( !h) 
return( ResError ); //assumes the Resource Mgr returns a non-zero error 
// locate and Open sound prefs file, ... 


return( 0 ) 


As I mentioned at the beginning, the resource manager 
may return a NIL handle, but it rarely returns a non-zero value 
of ResError. 

The upshot of all this is that the caller got a 0 error return 
and thought that the sound prefs file was open. When it did the 
GetlNamedResource, and it failed, it then tried to close the 
current resource file, which in this case was my Debugger, and 
things went to hell from there. 

In retrospect, a more robust way to specify and code the 
routine might be to have it return the (FCB) refNum of the 
sound prefs file that it opened or 0. Then the logic in the calling 
proc would be somewhat cleaner and less subject to failure. 

Rewriting, the revised code would be: 
int open_Snd_Prefs() { 

int refNum = 0; 
handle h = GetResource('STR ',SBF48); // get name of Sound Prefs file 
a h ) 


// use Alias Mgr, etc to locate and open Sound Prefs resource file 
refNum = ?? // some value returned by HighLvlIFSDisptch 


\ 
J 


return( refNum ) } 


As a last thought, I suspect that the buggy version of the 
code has been distributed by DTS as sample code for you to 
use, and in my humble opinion, it leaves something to be 
desired. Not because it is intrinsically wrong, but because the 
Macintosh Resource Manager is inconsistent about returning a 


FEBRUARY 1995 @® MACTECHMAGAZINE 


ScriptWizard 
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SOME THINGS THAT YOU CAN Try AT HOME: 


1) Search your code for ResError calls and convince yourself 
that they serve some purpose, or that you won’t do 
anything really stupid if it returns 0 when it should not. 

2) If you are using a class library such as MacApp, Metrowerks 
PowerPlant or TCL, then search it for ResError calls. 

3) Selectively remove resources from your product and see 
what kind of stupid things it does. 

4) Selectively remove resources from some one else’s product and 
see what kind of stupid things it does. Submit bug reports. 


An alternative title for this article could have been 
“ResError Considered Harmful”. During the language wars of 
the 60’s and 70’s, I believe that Dijkstra threw the first stone by 
writing an article in SIGPlan, the ACM’s Special Interest Group 
of Programming Languages titled “Goto Considered Harmful”. 
His thesis was that the use of the goto statement made for poor 
programming style, etc. Over the next few years, the wars 
escalated to the point where I suspect that someone wrote an 
article titled “Harmful Considered Harmful”. 

[We welcome your comments, feedback, and debugging tales of 
woe and intrigue at editorial@xplain.com — Ed stb/ 





A Quick Trip INTO THE DEPTHS 














By Mike Scanlin, Mountain View, CA 





a 


SYMBOLIZE 


This month’s challenge was anonymously suggested. The goal 
is to make the output of a non-symbolic disassembler into a 
symbolic disassembly. The output file of the non-symbolic 
disassembler looks like this: 

QOO6CDDE RTS 

QO006CDEO LINK A6 , #50000 

QO06CDE4 MOVE.L  A4,-(A7) 


QOO6CDE6 JSR 0006CE12 
etc. 


The symbol file you are given looks like this (and, yes, the 
real file I use for testing will have the LowMem and HiMem 
values in it so that you'll be able to find a symbol for any 
address): 

00000000 LowMem 

QOOO6CDDE Foo 

OOO6CDEO MyFunction 


OO06CE12 MyOtherFunction 
FFFFFFFF HiMem 


Your job is to take every 8 byte hex value in the input 
disassembly and look it up in the symbol file and then 
substitute the symbol (and offset) for the value. If you ran your 
routine on the above fragment then the output would be this: 


[Foo ] RTS 

[MyFunction ] LINK A6 , #$0000 
[MyFunctiont4 ] MOVE.L  A4,-(A7) 
[MyFunctiont6 ] JSR MyOtherFunction 


The prototype of the function you write is: 


void 

Symbolize(inputFile, symbolFile, outputFile, symLength) 
FILE *inputFile; 

FILE *symbolFile; 

FILE *outputFile; 

unsigned short symLength; 


InputFile is a standard C input stream containing the non- 
symbolic disassembly (as ASCII text). SymbolFile is a standard C 
input stream containing addresses (as ASCII text, not binary) 
and symbols (sorted by address, lowest to highest). The first 
symbol is for address 00000000 and the last symbol is for 
address FFFFFFFF, as shown in the example above. OutputFile 
is a standard C output stream that you send the symbolized 
disassembly to (also ASCII text). There is no need to fopen or 
fclose any of these streams (my test bench program will do it 
for you). 

SymLength is the number of characters between the ‘[' and 
‘! in the outputFile (which will range from 12 to 32). All 
expressions of the form <symbolName>+<offset from symbol in 
base 10> should be exactly symLength characters long. Pad with 
spaces on the right if it’s shorter and remove characters from 
the right side of symbolName if it’s longer (always have the 
complete offset, unless it’s zero). SymLength is 13 in the 
example above. 

The largest symbolFile you'll receive is 512K and the largest 
inputFile you'll receive is 50K. You can assume that you'll have 
enough space for the outputFile. Before returning, your routine 
should dispose of any memory it might allocate. 

Unlike some previous Challenges where you were allowed 
to write an untimed Initialize routine, there is no Initialize 
routine this month. The time it takes you to parse the 
symbolFile will be included in your overall time. The average 
inputFile will be 20K and contain 800 addresses to look up. The 
average symbolTable will contain 2000 symbols. 

E-mail me if you have any questions. Have fun. 


Two MontTus AGO WINNER 
Congratulations to Challenge Champion Bob Boonstra 
(Westford, MA) for earning his sixth win in the Rubik’s Cube 
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Challenge. This is a special month for Bob because he has 
decided to retire from Programming Challenges and become the 
first person to enter the Programmer’s Challenge Hall of Fame. 
Bob included this note along with his entry: 


Should I be so fortunate as to win, I would like to announce my 
retirement from regular Programmer's Challenge competition. I 
may enter occasionally, particularly for any assembly language 
challenges or PowerMac challenges, but I want to devote more 
time to other pursuits. Besides, it's time to give someone else a 
chance. I have truly enjoyed the Challenges, and I commend 
Mike for keeping people focused on efficiency. 

-- Bob Boonstra 


Well, Bob, thanks for playing. We’ve all enjoyed learning 
optimization tricks from a master programmer during the last 
couple of years. I’m sure it will be a while before anyone 
collects as many wins as you have to take away your title. 

Here are the times and code sizes for each entry. Numbers 
in parens after a person’s name indicate how many times that 
person has finished in the top 5 places of all previous 
Programmer Challenges, not including this one: 

















Name time code+data 
Bob Boonstra (13) 79 72,892 
Ernst Munter (4) 156 4526 
Allen Stenger (8) 222 9,872 
Robert Hearn 266 4,492 
Jim Lloyd (1) 900 33,044 





As always, Bob’s code is well commented and fun to read. 
In addition to studying it for efficiency tips (and interesting 
macro definitions) you can bet that I'll be watching the moves it 
makes to try and learn how to put my cube back to its initial 
state. Maybe someday I'll be able to solve any cube in the 
theoretical 22 or 23 moves. Right, and maybe monkeys will fly 
out of my butt, too... 


SOLVERUBIKSCUBE 
Copyright (c) 1994 J Robert Boonstra 
This source has been edited for length. The entire source is 
available at the usual online sites. Please see page 2 for details. 


Problem Statement 

Solve Rubiks cube, given an initial state by a call to 
MikeCubeToRubiksCube. Provide access to solution progress 
via RubiksCubeToMikeCube. Return 1 when cube is solved, 0 
after an intermediate move, and -1 if the cube is unsolvable. 


Background 

Although it hasn’t been proven, it is believed that “God’s 
algorithm” for solving the cube requires something like 22 or 23 
moves in the worst case. Back in the 1970s, when the cube 
was introduced, Singmaster and Thistlethwaite published 
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solutions that solve the cube in ~52 moves, and that result has 


probably been improved upon since then. (These numbers 
may count half-turns as a single move instead of two quarter- 
turn moves — some people prefer to count that way.) For those 
interested in the cube, there is an active mailing list — send mail 
to cube-lovers-request@ai.mit.edu for more info. In the event 
that Singmaster, Thistlethwaite, God, or an avid cube-lover 
doesn’t enter the challenge, we offer this solution. 


Solution strategy 
This solution is based on the now out-of-print book by Don 
Taylor, entitled Mastering Rubik’s Cube, and sold at the time for 
the princely sum of $1.95. While not in any way optimal, the 
solution in the book has the advantage of being (relatively) 
easy to remember. 

We solve the cube using the following steps: 
. Solve the edge cubes in the top layer. 
. Solve the corner cubes in the top layer. 
. Solve the (edge) cubes in the middle layer. 
. Move the bottom layer corner cubes to the correct position. 
. Orient the bottom layer corner cubes correctly. 
. Move the bottom layer edge cubes to the correct position. 
. Orient the bottom layer edge cubes correctly. 


NI ON BRR © DO 


This solution trades a large amount of space (code) for 
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speed. The operators that transform the cube are coded 
as macros, rather than as subroutines. (These macros 
were generated by an auxiliary program.) 


rubik.c 


#pragma options (honor_register, assign_registers) 
finclude "rubik.h" 
finclude "transform.h" 


char *theMoveP;: 
char *lastMoveP:; 
short firstTime: 


/* pointer to stored moves */ 
/* pointer to final move */ 
/* set to 1 by MikeCubeToRubiksCube */ 


int SolveRubiksCube(register RubiksCube *rub) 
{ 
register unsigned short ch; 

if (firstTime) { 


// First time through, check to see if the cube is legal. Check for existence of the 

// required corners/edges. (We also could check the twist on the corners and the flip 

//parity on the edges to ensure that the cube is solvable, but I never got that working.) 
if (!LegalCube(rub)) return(-1); 

//Find complete solution on first call. Play back on subsequent calls. Initial solution 


//split into subroutine calls to deal with Symantec C limit on code in one file. 
SolveTopEdgesFR(rub) ; 
SolveTopEdgesLB(rub) ; 
if (!SolveTopCorners(rub)) return (-1); 
if (!SolveMiddleLayer(rub)) return (-1); 
if (!SolveBottomCorners(rub)) return (-1); 
if (!SolveBottomEdges(rub)) return (-1); 
firstTime = 0; 


// Restore the initial cube state so that we can play back the moves one at a time. 


theMoveP;: 
rub->theMove; 


lastMoveP = 
theMoveP = 
{ 
register long *p=(long *)&rub->cubie[0] [0]; 
register ct=16*8/sizeof (long); 
do { 
*p = *(pt 16*8/sizeof(long)); 
t+tp : 
} while (--ct); 
} 
} 
ch = *theMoveP; 





switch (ch) { 
case U: Ulmove; break; 
case F: Flmove; break; 
case L: Llmove; break; 
case D: Dlmove; break; 
case B: Blmove; break; 
case R: Rlmove; break: 
case u: U3move; break; 
case f: F3move; break; 
case 1: L3move; break: 
case d: D3move; break; 
case b: B3move; break; 
case r: R3move; break: 
} 
return (lastMoveP == ++theMoveP) ; 
} 
atten CornerVal(X,Y,Z) \ 


(1< (XaHEYIHEZAHE “HBO ) | (LOGHAGHEZzIHE HEY) | \ 


(1 CXGHEYIHEZAHE_#HEZ) ) 
ice EdgeVal (X 


Z) \ 
(1< (XHEZAHE_AHEX) ) ) | (1<xdHEZHE4HEZ) ) 
i crn(a,b,c) ((1<a) | (1b) | (1Xc)) 
define edg(a,b) ((1<a) | (1<b)) 


static Boolean LegalCube(RubiksCube *rub) 
{ 

char cubeValues [20]; 

register long whichCubes=0; 

register char *valP; 

register short count,theVal; 
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// Make certain all the necessary corner cubes are there. 
valP = cubeValues; 
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*valPt+ = CornerVal(U,L,F); 
*valPtt+ = CornerVal(U,R,F); 
*valPt++ = CornerVal(U,L,B); 
*valPt++ = CornerVal(U,R,B); 
*valP++ = CornerVal(D,L,F); 
*valPt++ = CornerVal(D,R,F); 
*valPt++ = CornerVal(D,L,B); 
*valP++ = CornerVal(D,R,B); 
valP = cubeValues; 
count=8; 
whichCubes=0; 
do 
theVal = *valPt++; 
if (theVal == crn(U,L,F)) {whichCubes}/=0x01; continue; 
if (theVal == crn(U,R,F)) {whichCubes|=0x02; continue; 
if (theVal == crn(U,L,B)) {whichCubes|=0x04; continue; 
if (theVal == crn(U,R,B)) {whichCubes|=0x08; continue; 
if (theVal == crn(D,L,F)) {whichCubes|=0x10; continue; 
if (theVal == crn(D,R,F)) {whichCubes|=0x20; continue; 
if (theVal == crn(D,L,B)) {whichCubes|=0x40; continue; 
if (theVal == crn(D,R,B)) {whichCubes|=0x80; continue; 
return false; 
} while (--count) ; 
if (whichCubes != OxFF) return false; 
// Make certain all the necessary edge cubes are there. 
valP = cubeValuest8; 
*valPt+ = EdgeVal(U,L); *valPt++ = EdgeVal(U,R); 
*valPt+ = EdgeVal(D,L); *valP++ = EdgeVal(D,R); 
*valPt+ = EdgeVal(U,F); *valPt++ = EdgeVal(U,B); 
*valP++ = EdgeVal(D,F); *valPt++ = EdgeVal(D,B); 
*valPt++ = EdgeVal(L,F); *valPt++ = EdgeVal(L,B) ; 
*valPt++ = EdgeVal(R,F); *valPt+t+ = EdgeVal(R,B) ; 
valP = cubeValuesté8; 
count=12; 
whichCubes=0; 
do { 
theval = *yvalrrt; 
if (theVal == edg(U,L)) {whichCubes|=0x0001; continue; 
if (theVal == edg(U,R)) {whichCubes|=0x0002; continue; 
if (theVal == edg(D,L)) {whichCubes|=0x0004; continue; 
if (theVal == edg(D,R)) ({whichCubes/=0x0008; continue; 
if (theVal == edg(U,F)) {whichCubes|=0x0010; continue; 
if (theVal == edg(U,B)) {whichCubes|=0x0020; continue; 
if (theVal == edg(D,F)) {whichCubes|=0x0040; continue; 
if (theVal == edg(D,B)) {whichCubes|=0x0080; continue; 
if (theVal == edg(L,F)) {whichCubes|=0x0100; continue; 
if (theVal == edg(L,B)) {whichCubes|=0x0200; continue; 
if (theVal == edg(R,F)) {whichCubes|]=0x0400; continue; 
if (theVal == edg(R,B)) {whichCubes|=0x0800; continue; 
return false; 
} while (--count); 
if (whichCubes != OxFFF) return false; 
return (true); 
} 
rubik.h 
TYPEDEFS and DEFINES 


typedef struct CubeSide { 


char littleSquare[3] [3]; 


} CubeSide; 


typedef struct MikeCube [ 
CubeSide face[6]; 


} MikeCube; 


// face ordering in MikeCube 
enum {kTop=0, kLeft, kFront, kRight, kBottom, kBack]; 


typedef struct RubiksCube { 
char cubie[16] [8]; 
char origCube[16] [8]; 
char theMove[512]; 


} RubiksCube, 


*RubiksCubePtr; 
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// face ordering in RubiksCube 


AnN11m f 
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F=0,L,R,B8,U,D,f,1,r,b,u,d}; 


// Macros Front(x) give access to individual cubies on the Front face. 


// Similarly for oth 


FA Ata HK 


7;aerine 
#define 
#define 
#define 
##fdefine 
#define 


Front(x) rub->cubiel[x] [0] 
Left (x) rub->cubie[x] [1] 
Right(x) rub->cubie[x] [2] 
Back(x) rub->cubie[x] [3] 
Up (x) rub->cubie[x] [4] 
Down (x) rub->cubie[x] [5] 


er faces. 




















// Set up symbols to represent individual cubie faces 














ULF_F 
UP_ 
URF_F 
LF_F 
Ree 
DLF_F 
DF_F 
DRE. 


Fro 


Fro 


LF_L 
DLB_L 


DL_L 














URF_R 
UR_R 
URB_R 
RF_R 
RB_R 


Fro! 
Fron 


Fron 
Fron 
Fron 
Fron 


ULB_L Left 
UL_L Left 
ULF_L Left 
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define URF_U Up(8 


i 

Macro M(x) records the individual turns in the transformation for playback during 
subsequent calls to SolveRubiksCube. 

1 

#fdefine M(x) *theMoveP+t = x; 

#define Rot2(a,b) \ 
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register char tmp; tmp=a; a=b; b=tmp;} 

#define Rot3(a,b,c) \ 

register char tmp; tmp=a; a=b; b=c; c=tmp;} 

define Rot4(a,b,c,d) \ 

register char tmp; tmp=a; a=b; b=c; c=d; d=tmp;]} 

define Rot5(a,b.c,d,e) \ 

register char tmp; tmp=a; a=b; b=c; c=d; d=e; e=tmp;] 
#fdefine Rot6(a,b,c,d,e,f) \ 

register char tmp; tmp=a; a=b; b=c; c=d; d=e; e=f:; f=tmp; } 




















define Rot7(a,b,c,d,e,f.g 
register char tmp;tmp=a;a=b;b=c;c=d;d=e;e=f;f=g; g=tmp; } 
define Rot8(a,b,c,d,e,f,g,h) \ 
register char tmp;tmp=a;a=b;b=c;c=d;d=e;e=f;f=g;g=h;h=tmp; } 
define Rot9(a,b,c,d,e,f,g,h,i) \ 
register char tmp;tmp-a;a=b;b=c;c=d;d=e;e=f;f=g;g=h;h=i; \ 
} 


i=tmp; 
#tdefine Rotl0(a,b,c,d,e,f,g,h,i,j) \ 
{register char tmp; ee \ 
ae eae 
#tdefine Rotl2(a,b,c,d,e,f,g,h,i,j,k,1 





\ 

{register char tmp;tmp=a;a=b;b=c;c=d;d=e;e=f;f=g;g=h;h=i; \ 
i=]; ae l=tmp; } 

define Rot15(a,b,c,d,e,f,g,h,i,j.k,l,m,n,o) \ 

{register char tmp; tmp=a;a=b ;b=c c=d;d=e;e=f;f=g;9=h:h=i; \ 
i= Te op ate hal ae 

#define Rotl6(a,b,c,d,e,f,g,h,i,j,k,1,m,n,o,p) \ 

{register char tmp; eee a=b;b=¢;0=did=e;e=f;f=pe=hyh=i7 \ 
i=43 lias H=o70=psp=tmps 

Fdefine CornerEquals(X,Y,Z,a,b,c) 


XHAIFEZAHE_ stele _ 
XGHEYIHEZIHE_dHIY==c ) 
XiHEYAHEZHHE_4HFZ==c ) ) 


\ 
Hie HEx==b 
XGHEYIHEZAHE_FHEY==b 
XGHEY THE ZAHE_dHIZ== 


#define CornerCorrect (X,Y,Z 
( (HHEYIHEZIHE_dHEX==X arate HHEX==Y 
CXdHAIHEZIHE_dHRY==x | | HAH ZaHE dHIV==v 
Mat Higoor XHEVGHEZAHE_#HAZ==Y 


i 
( CGHAGHEZIAR Hixe=a 
CHAHEZHHE_AHFY==a 
OHH Hime 


— 











XGEYHHEZHHEdHX==Z) && \ 
XY GHEZ#HRHHEY==Z)  &6 
| X#HEYGHEZdHE_dHFZ==Z) ) 


a 

















int SolveRubiksCube(RubiksCube *cubePtr) ; PROTOTYPES 


int FindSolution(void);: 


void MikeCubeToRubiksCube(MikeCube *mikePtr, 

RubiksCube *rubikPtr) ; 
void RubiksCubeToMikeCube(RubiksCube *rubikPtr, 

MikeCube *mikePtr); 
void SolveTopEdgesFR(RubiksCube *rubPtr); 

void SolveTopEdgesLB(RubiksCube *rubPtr); 

Boolean SolveTopCorners(RubiksCube *rubPtr); 

Boolean SolveMiddleLayer (RubiksCube *rubPtr); 

Boolean SolveBottomCorners(RubiksCube *rubPtr);: 

Boolean SolveBottomEdges(RubiksCube *rubPtr); 

Boolean LegalCube(RubiksCube *rubPtr); 








extern char *theMoveP: 
extern short firstTime; 


/* pointer to stored moves */ 


convert.c 
include "rubik.h" 


/* mapping of MikeCube faces to RubiksCube faces */ 
char rubikFaceOrder[] = {F,L,R,B,U,D}: 
char mikeToRubik[] = {U,L,F,R,D,B}; 
char rubikToMike[] = 
(kFront,kLeft,kRight,kBack,kTop,kBottom) ; 
olo rToRubik [6]; 
ri olorToMike [6 6]: 





MikeCubeToRubiksCube 


void MikeCubeToRubiksCube(MikeCube *mikePtr, 
RubiksCube *rubikPtr) 
{ 
short £,7,¢c° 
theMoveP = rubikPtr->theMove: 


firstTime = ] 
for (f=0: £46; +4£) 4 
for (r=0; r<3; t+tr) { 
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for (c=0; c<3; tte) { 
/* delete s,d if numbering is corrected */ 
shore 6=r,d=¢; 
rubikPtr->cubie[3*std] [mikeToRubik[f]] = 
mikeToRubik[ mikePtr->face[f].littleSquare[r] [cl]; 
} 
} 
for (f-02 £66: #rt) 4 
char theColor; 
theColor = rubikFaceOrder[rubikPtr->cubie[4] [f] ]; 
rubikColorToMike[f] = theColor; 
mikeColorToRubik[theColor] = f; 
} 
for (f=0; £<6; ++f) 
for (r=0; r<3; +tr) 
for (c=0; e<3; +c) { 
char *p = G@rubikPtr->cubie [3*rtc] [f]; 
*p = mikeColorToRubik[*p]; 
} 
for (f=0; £<6; ++f) 
for (r=0; r<3; ttr) 
for (c=0; c<3; ttc) 
rubikPtr->origCube[3*rtc] [f] = 
rubikPtr->cubie[3*rtc] [f]; 
//PrintCube(rubikPtr,&oldRub,' '); 
} 





RubiksCubeToMikeCube 


void RubiksCubeToMikeCube(RubiksCube *rubikPtr, 
MikeCube *mikePtr) 

{ 

Siort ©,%,¢; 

for (f=0; £<6; ++f) { 
for (r=0; r<3; ttr) { 
for (c=0; c<3; tte) { 
short s=r,d=c; 


mikePtr->face[f] .littleSquare[r] [c] = 
rubikToMike[ rubikColorToMike[ 
rubikPtr->cubie[3*std] [mikeToRubik[f]] ] ]; 


SolveTopEdgesFront-Right.c 


#tpragma options(honor_register,assign registers) 
finclude "rubik.h" 
finclude "transform.h" 


void SolveTopEdgesFR(register RubiksCube *rub) 
{ 


// STEP 1: Put the edge cubes in the top layer into the proper position and orientation. 


// Loop until all are correct. 























if (UF_U == U && UF_F == F) { 

/* leave edge in correct position */ ; 
else if (UF_U == F && UF_F = U) F2DIRIF3R3; 
else if (UR_LU == F && UR_R == U) { R3F3; 
else if (UB_LU == F && UB_B = U) B2D3R1F3R3; 
else if (UL_LU == F && UL_L == U) LIF1: 
else if (UR_.U == U && UR_R == F) R2D3F2 
else if (UB_LU == U && UB_B == F) B2D2F2 

} else if (UL_U == U && UL_L == F) L2D1F2 
else if (RF_F == F && RF_R == U) F3; 
else if (RB _R == F && RB_LB = U) { B3D3B1R1F3R3; 

} else if (LB_B == F && LBL = U) { BID2B3F2; 
else if (LF_L == F && LE_F = U) LIDIL3F2: 
else if (RF_F == U && RF_R == F) FIDIRIF3R3; 
else if (RB_R == U && RB_B == F) R2F3R2; 

} else if (LB B = U && LBL = F) { B1ID3B3R1F3R3; 
else if (LF_L = U && LE_F = F) Fl: 
else if (DF_D == F && DF_F = U) DIR1F3R3; 
else if (DR_D == F && DR_R == U) R1F3R3; 
else if (DB_D == F && DBLB = U) { D3R1IF3R3; 

} else if (DL_D == F && DLL = U) L3FILIS 
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Douglas MacDisk 
Duplicator 


Eee 7 he low-cost solution to disk duplication! 





The simple, low cost, no frills MacDisk Duplicator is the 
answer to your software duplication needs. No other duplicator can 
match its ease of use and efficiency for the price. All you need to 
operate the duplicator is an Apple Macintosh computer. From there, 
you simply plug the duplicator’s disk drive into the Macintosh, load 
the diskettes into the input hopper and get back to your other work. 
A short while later, your disks will be ready for labeling and 
distribution. Disk duplication couldn’t be any easier or more eco- 
nomical than with the MacDisk Duplicator from Douglas Electron- 
ics. The MacDisk Duplicator runs on any Macintosh with an external 
floppy port. 

Pricing: 


$1,500 without disk drive 
$1,850 with FDHD disk drive 


For More Information: 





DOUGLAS 
ELECTRONICS 
ENC. 


2777 Alvarado Street 





San Leandro, California 94577 
[510] 483-8770 - FAX 483-6453 





PROGRAMMER’S CHALLENGE Ej 









All TE XY is not 
created equal. 


Is your application taking cut So why should you join the 
G paste a little too literally when PAIGE revolution? TIME. Most 
it creates text? Are you tired of | programmers don’t have time to 






living in a monotype world? — reinvent the wheel. 







PAIGE”, our text & page layout PAIGE was designed using 
programming library, is the ulti- no global variables and machine 
mate cross-platform solution. specific code has been isolated 






PAIGE provides the most into two small source files. This 
sophisticated features/functions strategy allows you to move your 
in the business. These include: application to other operating 

: systems or platforms by chang- 

¢ Stylized Text y P y S 


? ly platform specific c 
* Shapes & Containers ing only p utform specific code 
. while maintaining full data and 
¢ Text Wrapping ae bis 
. application compatibility. 
¢ Embedded Objects 


. Join the hundreds of major 
° Hypertext Links software publishers using PAIGE 
¢ Virtual Memory 


as their total text solution. For 


















* Style Sheet Support complete technical/pricing sum- 
* Multi-Level “Undo” mary contact DataPak Software 
¢ Royalty Free at 800-327-6703 or 206-573-9155. 





Macintosh ¢ Power Macintosh ¢ Windows 





} else if (DF_LD == U && DF_F == F) { F2; 

} else if (DR_D == U && DR_R == F) { D3F2; 

} el if (DB_D == U && DB_B == F) { D2F2 
else if (DL_D == U && DL_L == F) { D1F2; 


//Find the top-right edge cube, and move it into the proper position. 
if (URLU == U && UR_R == R) { 
/* leave edge in correct position */ ; 














else if (UF_LU == R && UF _F == JU FIRI1; 
else if (UR_LU == R && UR_R == JU) | R2D1B1R3B3; 
else if (UB_LU ==R && UB_B == U) [{ B3R3: 
else if (UL_U ==R && UL_L == U) { L2D3B1R3B3 

} else if (UF_U == U && UF_F ==R F2D1R2; 

} else if (UB_LU == U && Up 5 == Fk B2D3R2; 

} else if (UL_LU == U && UL_L ==R L2D2R2: 
else if (RF_F == R && RFR == JU FIDIF3R2; 
else if (RB_LR == R && RB B== JU Ra: 
else if (LB_B ==R && LBL == U) L3D3L1B1R3B3; 

} else if (LF_L ==R && LF_F == U) { L1D2L3R2:; 

} else if (RF F == U && RF_R == R) { RI; 

} else if (RB_R ==U &§& RB_B == R) { R1D1B1R3B3 

} else if (LBB == U && LB_L == R) { B2R3B2; 

} else if (LF_L U && LF_F ==R L1D3L3B1R3B3;: 

} else if (DF_D R && DF F == U F3R1F1; 

} else if (DR_D ==R &§& DR_R == U D1B1R3B3; 
else if (DB D ==R && DB_B == U B1R3B3; 
else if (DLD ==R && DL_L == U) D3B1R3B3; 
else if (DF_D == U && DF_F == R D1R2; 
else if (DR_D == U && DR_R == R) { R2: 
else if (DB D == U && DB B =R D3R2; 
else if (DLD == U && DLL == R D2R2; 




















SolveTopEdgesLeft-Back.c 


pragma options (honor_register,assign_registers) 


EI PROGRAMMER’S CHALLENGE 


nclude "rubik.h" 
#include "transform.h" 


void SolveTopEdgesLB(register RubiksCube *rub) 


// Find the top-back edge cube, and move it into the proper position. 






































if (UB_LU == U && UB_B == B) { ;/* correct as is */ 
else if (UF_U == B && UF_F == U) { F2D3L1B3L3; 

} else if (UR_U == B && UR_R == U) {( RIBI; 
else if (UB_U == B && UB _B == U) { B2D1L1B3L3; 
else if (UL_LU == B && UL_L == U) { L3B3: 
else if (RF_F == B && RF _R == U) { FID2F3B2; 
else if (RB_R == B && RB B == U) [{ R1D1R3B2; 
else if (LB_B == B && LBL == U) { B3; 
else if (LF_L == B && LF _F == U) { F3D3F1L1B3L3; 
else if (DF_D == B && DF F == U) { D3L1B3L3+ 
else if (DR_D == B && DR R == U R3B1R1; 
else if (DB _D == B && DB B == JU DLGIB3SL3: 
else if (DL_D == B && DL L == U LLB 3434 
else if (UF_U == U && UF_F == B) { F2D2B2:; 
else if (UR_LU == U && UR_R == B) { R2D1B2; 

} else if (UL_U == U && UL_L ==) { L203b2% 

} else if (RF_F == U && RF R == B) { F1D3F3L1B3L3;: 
else if (RB_R == U && RB B == 8B Bis 
else if (LB_B == U && LB_L == B) { BIDILIB3L3: 
else if (LF_L == U && LF F == B) LZB3L2% 
else if (DF_D == U && DF _F == B) D2ZB2 
else if (DR_D == U && DR_R == B) D1B2; 
else if (DB_D == U && DB B == B) B2; 
else if (DL_D == U && DLL == B) { D3B2; 

















// Find the top-left edge cube, and move it into the proper position. 




































































if (UL.U == U && UL_L == L) (; /* correct as is */ 
else if (UF_LU == L && UF_F == U) { F3L3% 
else if (UR_LU == L && UR_R == U) { R2D3F1L3F3; 
else if (UB_LU == L && UB_B == U) { BILI: 
else if (UL_LU == L && UL_L == JU) { L2D1F1L3F3; 
else if (UF_U == U && UF_F ==L) { P2U3b24 
else if (UR_LU == U && UR_R ==L) { R2D2L2; 

} else if (UBLU == U && UB_B == L) { B2D1L2; 

} else if (RF_F == L && RFR == U) { R3D3R1F1L3F3; 
else if (RB_LR == L && RB_B == U) { RID2R3L2; 
else i LB_B L && LB_L == U) { B1D1B3L2; 
else if (LF_L L && LF_F == U) { L3; 
else i RF_F == U && RF_R == L) { F2L3F2: 
else i RB_R == U && RB_B == L) { R1D3R3F1L3E3: 

} else if (LB_LB == U && LBL ==L) { Lé 
else if (LF_L == U && LF_F ==L) { LID1F1L3F3; 
else if (DF_D == L && DF F == JU F1L3F3; 
else if (DR_D == L && DR R == U) { D3F1IL3E3; 
else if (DB D == L && DB B == U B3LIBI + 
else if (DL_D == L && DLL == JU) { DIFIL3F3; 
else if (DF_D == U && DF F ==L) [{ D312: 

} else if (DR_D == U && DR R ==I DzL2Z; 

} else if (DB_LD == U && DB_B ==L) { DIL2: 

} else if (DL_D == U && DLL ==L) { 12: 

} 

} 
SolveTopCorners 


#pragma options (honor_register,assign_ registers) 
#include "rubik.h" 


include "transform.h" 
Boolean SolveTopCorners(register RubiksCube *rub) 
short loopCount 


// STEP 2: Put the corner cubes in the top layer into the proper position and 
// orientation. Loop until all are correct. 


loopCount=0; 
do { 
if (++loopCount>8) return false: 
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if (DRF_D == R) { 

} else if (DRF_D == L) 
} 

else if (DRF_R == R) [ 
if (DRF_D == F) { 

else if (DRF_D == B) 


— 


} else if (DRF_R == B) { 
if (DRF_D == R) { 
else if (DRF_D == lL) 


1} else if (DRF_R == L) { 
if (DRF_D == F) { 
else if (DRF_D == B) 





} 

else if (DRF_R == U) { 

if (DRF_F == F) { 
if (DRF_D == R) { 
} else if (DRF_D == L) 
} 

1} else if (DRF_F == R) { 
if (DRF_D == F) { 
} else if (DRF_D == B) 
} 

} else if (DRF_F == B) [ 
if (DRF_D == R) { 
} else if (DRF_D == L) 
} 

} else if (DRF_F == L) { 
if (DRF_D == F) { 
} else if (DRF_D == B) 
} 

} 

else if (DRF_D == U) [ 

if (DRF_F == F) [{ 
if (DRF_R == R) { 
} else if (DRF_R == L) 
} 

} else if (DRF_F == R) [ 
if (DRF_R =F) { 
} else if (DRF_R == B) 
} 

|} else if (DRF_F == B) { 

if (DRF_R == R) { 

} else if (DRF_R == L) 


\ else if (DRF_F == L) { 
if (DRF_R == F) { 
} else if (DRF_R == B) 





goto corner?2; 


URF1: 


URB1: 


ULBI1: 


ULL? 


_ 


if (DRF_F = U) 
} else if (DRF_R == U) [ 
} else if (DRF_D == U) 
} 

goto corner2; 

if (DRB_R == U) { 
} else if (DRB_B == U) [ 
} else if (DRB_D == U) 1 


_ 


goto corner2; 

if (DEB {B-==" U) { 
} else if (DLB_L == U) { 
else if (DLB_D == U) { 





goto corner2; 

1f (DLE _L == 0) { 
} élee it (DLE_F == V) 
} else if (DLF_D == U) 
} 


corner2: 


if (DRB_R == U) { 


if (DRB_B == F) { 
if (DRB_D == R) { 
} else if (DRB_D == L) 
} 

} else if (DRB_B == R) { 


goto URF1; 


lien! 


goto URF1; 


_ 


D1; goto URBI; 
{ D2; goto ULB1; 


D3; goto ULF1; 
{ D2; goto ULB1; 


goto URF1; 


{ D3; goto ULF1; 


goto URF1; 


o_o 


D1; goto URB1; 
{ D2; goto ULBI1; 


D3; goto ULF1; 
{ D2; goto ULBI; 


goto URFI; 


_ 


goto URF1; 


{ Dl; goto URB1; 


D1; goto URBI; 
{ D2; goto ULB1; 


D3; goto ULFI; 
{ D2; goto ULB1; 


FID1F3; 
R3D3R1; 
R3D1R1D2R3D3R1 ; 


R1D1R3; 
B3D3B1; 
B3D1B1D2B3D3B1; 


BIDILBS; 
L3DS3L1; 
L3D1IL1ID2L3D3L1; 


LiDIL3; 
F3D3F1; 
F3DIFID2ZFSD3F1; 


D33 goto UREZ} 
{ D2; goto ULF2; 
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D3; goto ULF1; 


D1; goto URB1; 


Dl; goto URB1; 


D3; goto ULFI; 


WHETHER YOU'RE HEADED TO CHICAGO, DAYTONA, 
OR POINTS UNKNOWN, SUMMIT BASICSCRIPT HELPS 
YOU ARRIVE IN STYLE. 


The BasicScript Toolkit makes it easy and 
economical to add an award-winning scripting 
language to your Macintosh, Power Macintosh, 
or Windows application. 

a Easy-to-use APIs make it simple to integrate 
BasicScript into your application using or C++. 

i — with the syntax of Microsoft Visual Basic 
and Visual Basic for Applications (VBA). 

a Controls OLE Automation objects in Macintosh, 
Windows, and Windows NT applications. 

ia Extensibility architecture allows you to add your own 
keywords to the BasicScript language. 

a Available for Macintosh, Power Macintosh, Windows 3.1, Windows 95 
"Chicago", Windows NT 3.5 a MS-DOS, 05/2, SunOS, Solaris 2.x, 
HP-UX, AIX, SCO UNIX, Ultrix, IRIX, and NetWare. 

a Runtime can be redistributed by your customer without royalties. 

a Script Editor with integrated debugger allows you to offer a complete 
Integrated Development Environment (IDE) for scripting. 

i Free technical support, comprehensive documentation, and numerous code 
samples keep your engineering costs to a minimum. 

i Licensed by — Delrina and other leading software companies. Named 
PC Magazine Editors’ Choice among cross-application macro languages. 

ig Flexible licensing terms mean you can afford the finest scripting language on the 
market today. 





rr 


iia Min te bx CALL TODAY FOR YOUR FREE | 
$s ema) "T evawuarion COPY, 315-445-9000 | 


Summit Software Company Fox: 315-445-9567 Internet: info@summsoft.com CompuServe: 71211,3504 





if (DRB D == F) { D3; goto URE2; 


else if (DRB_D == B) { goto URB2; 
| else if (DRB_B == B) { 
if (DRB_D == R) { goto URB2; 
else if (DRB_D == L) { Dl; goto ULB2; 


} else if (DRB_B == L) { 
if (DRB_D == F) { D2; goto ULF2; 
else if (DRB_D == B)*{ D1; goto ULB2; 





} 
} else if (DRB_B == U) { 


if (DRB_R == F) { 
1£ (DRB_D-== R) 4 D3; goto URF2; 
} else if (DRB_D == L) { D2; goto ULF2; 
} else if (DRB_R == R) | 


if (DRB_D == F) { D3; goto URF2; 


} else if (DRB_D == B) { goto URB2; 
} 

} else af (DRB_R == B) 4 
if (DRB_D == R) { goto URB2; 


} else if (DRB_D == L) 
} 
} else if (DRB_R == L) { 


a 


Dl; goto ULB2; 


if (DRB_D == F) { D2¢ goto. ULEZ} 
} else if (DRB_D == B) { Dl; goto ULB2; 
} 

} 

} else if (DRB_D == U) { 

if (DRB_LR == F) { 
if (DRB_B == R) { D3; goto URE2; 
} else if (DRB_B == L) { D2; goto ULF2; 
} 

} else if (DRB_R == R) [ 
if (DRB_B == F) { D3; goto URE2; 


PROGRAMMER’S CHALLENGE EI 


} else if (DLB_L == R) 











if (DLB_D == F) { D2; goto URF3; 
} else if (DLB_D == B) { D3; goto URB3; 
else if (DLB_L == B) 
if (DLB_D == R) { D3; goto URB3; 
else if (DLB_D == L) { goto ULB3; 
} else if (DLB_L == L) 
if (DLB_D == F) { Dl; goto ULF3; 
-——— TF rey 606 mM egahetes-of tb 5 = else iT (DLB_D — B) { goto ULB3 7 
programmer utilities. Most of the source code is in C 
Symantec, and MPW projects for C, C++, and Pascal. You'll find } else if (DLB_L == U) { 
complete working examples of full-blown applications, games, if (DLB_B == F) { 
control panels, extensions, utilities, and much more! $35 includ- if (DLB_D = ik) | D2; goto URF3; 
ing shipping. Add $5 for shipping outside of the U.S. and Canada. ) else if (DLB_D == L) ( Dl; goto ULF3; 
/ ‘ < J 
VISA, MC, American Express, and Discover gladly accepted. | elee 4¢ (ptB-8 == BR) 4 
: if (DLB_D == F) { D2; goto URF3; 


} else if (DLB_D == B) { D3; goto URB3; 


} else if (DLB_B == B) { 
if (DLB_D == R) { D3; goto URB3; 
else if (DLB_D == L) { goto ULB3; 








} else if (DLB_B == L) { 
if (DLB_D == 7) { 
} else if (DLB_D == B) 
} 
} else if (DLB_D == U) { 
if (DLB_B == F) { 
if (DLB_L == R) { D2; goto URF3; 
} else if (DLB_L == L) { Dl; goto ULF3; 


a SS ~ any — } else if (DLB_B == R) { 
Celestin Company, 1152 Hastings Ave, Port Townsend, WA 98368 


D1; goto ULF3; 
goto ULB3; 


_ 














else if (DRF_R == U) { R3D3R1; 
else if (DRF_D == U) { R3D1R1D2R3D3R1; 


if (DLB_LL == F) { D2; goto URF3; 
800 835 5514 © 206 385 3767 © 206 385 3586 fax else if (DLB_L == B) { D3: goto URB3 
Internet: celestin@olympus.net ¢ CompuServe: 71630,650 } else if (DLB.B ==) | 
if (DLB_L == R) | D3; goto URB3 
else if (DLB_L == L) { goto ULB3; 
else if (DRB B == { goto URB2; } else if (DLB_B == L) { 
| ce rmpe oe as if (DLB_L == F) { Dl; goto ULF3; 
eee At. LURE LR = 2) else if (DLB_L == B) [{ goto ULB3; 
if (DRB_B == R) { goto URB2; 
| else if (DER B == Li) { Dis goto ULE2: } 
yo 2 pee } 
else if (DRB_R == L) goto corner4; 
if (DRB_B == F) [ D2; goto ULF2; URF3: if (DRF_F == U) ( F1D1F3; 
else 1m (DRB_B == B) { Dl: goto ULB2; else if (DRF_R == U) { R3D3R1: 
} else if (DRF_D == U) { R3D1R1D2R3D3R1 
J 
7 . goto corner4; 
goto corner3; URB3: if (DRB_LR == U) { RIDIR3; 
URF2: if (DRF_F == U) { F1D1F3; else if (DRB_B == U) { B3D3B1; 
{ 
l 


else if (DRB_D == U) B3D1B1D2B3D3B1; 


goto corner4; 





| gore oan ULB3: if (DLB_B == U) { B1D1B3; 
URB2: il (DRB_R hie 0) | oy else if (DLB_L == U) { L3D3L1; 
J else if (DRB_B == ; else if (DLB_D == U) { L3D1L1D2L3D3L1: 
else if (DRB_D == U) { B3D1B1D2B3D3B1; a 
; goto corner4; 
dake cells ey ULF3: if (DLF_L == U) { LIDIL3: 
ULB2: ee ae 7 ) oa } else if (DLF_F == U) { F3D3F1; 
tPF Wo } else if (DLF_D == U) { F3D1F1D2F3D3F1: 
else if (DLB_D == U) { L3D1L1D2L3D3L1: eke | 
; corner4: ; 
goto corner3; if (DLF_L = 
ULF2: if (DLF_L == JU) { LID1L3; if (DLF F » ) f 
else if (DLF_F == U) { F3D3F1: if (DLF_D == R) { D1: 
ee as I (DLE_ : to URF4; 
else if (DLF_D == U) ( F3D1F1D2F3D3F1: en ee aa ee soto ULFA:; 
a — | } else if (DLF_F == R) 
i 2 ae — 7 if (DLF_D == F) { Dl; goto URF4; 
aa a Ilse if (D <= ; 
ee ee ae ote Une : else if (DLF_D { D2; goto URB4; 
} else if (DLB_D == L) { Dl: goto ULF3; else if (DLF_F == B) 
if (DLF_D == R) { D2; goto URB4; 
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} else if (DLF_D == L) { D3; goto ULB4; 
} 
} else if (DLF_F == L) { DEVELOPER 
if (DLF_D == F) { goto ULF4; 
} else if (DLF_D == B) { D3; goto ULB4; 
} 
} else if (DLF_F == U) { 
if (DLF_L == F) { 
if (DLF_D == R) { D1; goto URF4; 
else if (DLF_D == L) { goto ULF4; 


UNIVERSITY 


} else if (DLF_L = R) 








it (DLP) == F) 4 Dl; goto URF4; 
else if (DLF_D == { D2; goto URB4; 

} else if (DLF_L == B) 
if (DLF_D == R) | D2; goto URB4; 
else if (DLF_D == L) { D3; goto ULB4; 


} else if (DLF_L == L) { 
if (DLE D== F) { goto ULF4; 
else if (DLF_D == B) { D3; goto ULBA4; 





} else if (DLF_D == U) { 








if (DLF_L =F) { 

if (DLF_F == R) { Dl; goto URFA4; 
else if (DLF_F == L) { goto ULF4; 

} else if (DLF_L == R) { 
if (DLF F == F) { Dl; goto URF4; 
} else if (DLF_F == B) { D2; goto URB4; 

} else if (DLF_L == B) { 
if (DLF_F == R) { D2; goto URB4; 
} else if (DLF_F == L) { D3; goto ULB4; For more information, contact the Apple Developer University Registrar 
by telephone at (408) 974-4897 or fax (408) 974-0544. 

} else if (DLF_L ==.L) { 
if (DLF_F == F) { goto ULF4; Developer University, Apple Computer, Inc. 1 Infinite Loop, MS 305-1TU, Cupertino, CA 95014 
} else if (DLF_F == B) { D3; goto ULB4; 
} 

} 

} 
goto cornerDone: (ULF_U != U || ULF_L !=L || ULFLF != F)) { 
URF4: if (DRF_F == U) { FID1F3; P3DIF1; 

else if (DRF_R == U) { R3D3R1; 
else if (DRF_D == U) { R3DIRID2R3D3R1; } while (true); 


return (true) ; 
| 
goto cornerDone; ! 


URB4: if (DRB_R == U) { RIDIR3: 
else if (DRB B == U) { B3D3B1; Z 
else if (DRB_D == U) { B3D1B1D2B3D3B1: SolveMiddleLayer.c 
goto cornerDone: #pragma options(honor_register,assign_registers) 
ULB4: if (DLB_B == U) { B1D1B3: fFinclude "rubik.h" 


else if (DLB_L == U) { L3D3L1; #include "transform. h" 


l it (DLE DD == LIULLIDZL3SD3L 13 : 
else if ( = ) { // Moves to transfer a cube to the middle face. 


goto cornerDone; 











ike ce (itr L == o ( LIDIL3: /* FDDLDIDDf Up face matches Left center */ 
i if cs == J) { F3D3F1- define FDDLDIDDf£ Bl: D2; L1isDIVb3 :D23 83; 
alse if (DLF.D == U) ( F3D1F1D2F3D3F1: #tdefine RDDFDfDDr R1;D2;F1;D1;F3;D2;R3; 
— define BDDRDrDDb B1;D2;R1;D1;R3;D2;B3; 
eepneeienee = +#define LDDBDbDD1 L1;D2;B1;D1;B3;D2;L3; 
it j in the t in th t positi d orientation. 
ea oie oe ee ee Boolean SolveMiddleLayer (register RubiksCube *rub) 
ULF _F==F && URF_F==F && URF_R==R && URB_R==R && a ; . 
ULB B==B && URB B==B && ULF_L==L && ULB L==L) short loopCount; 
aie loopCount=0; 
i i in the t d into the bott 
_ : ee = ore P ay wT vTRE_R — m1) ee aa // STEP 3: Put the (edge) cubes in the middle layer into the proper position and 
URF U !=U | URF F l= F URF R !=R)) { // orientation. Loop until all are correct. 
R3DiR1; a4 
== IRB_R == U URB_B == U) && 
os Se ise : eee Sp } URB B I= af if (++loopCount > 24) return false; 
B3DIBl: — a if (DFLF !=D && DF_LD !=D) {( /* DF in wrong position*/ 
ee ee __ LBB == ULB L <= U) &% if (DF_F == F && DF_D == R) { D3FID2LID1L3D2F3; 
Se Sea = ; a : : } ae - } else if (DF_F == R && DF_D == F) { FID2L1D1L3D2F3; 
L3D1L ~ — } else if (DF_F == R && DF_D == 8B) { RID2F1ID1F3D2R3; 
a ae __ : __ _ } else if (DF_F == B && DF_D == R) { DIRID2F1D1F3D2R3; 
} else if ((ULFU =U || ULEL -- U || ULF_F = U) & } else if (DF_F == B && DF_D == L) { D1IBID2R1D1R3D2B3; 
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NOW SHIPPING 


QC: the Macintosh Testing solution. 
Subject your code to brutal stress 
conditions to make it break consistantly. 





Or use QC during the development cycle to 
casually detect block boundary overwrites, 
invalid BlockMoves, writes to location zero, 
and more...saving countless hours of 
needless debugging. 
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} else if (DF_F == L && DF_D == B) { D2B1D2R1D1R3D2B3; 
} else if (DF_F == L && DF_D == F) { D2L1D2B1D1B3D2L3; 
} else if (DF_F == F && DF_D == L) { D3L1D2B1D1B3D2L3: 
continue 
} else if (DR_R != D && DR_D != D) {/* DR in wrong pos*/ 
if (DR_R == F && DR_D == R) D2F1D2L1D1L3D2F3; 
} else if (DR_R == R && DR_D == F) D3FID2L1ID3L3D2F3; 
else if (DR_R == R && DR_D == B) D3RID2F1ID1F3D2R3; 
else if (DR_R == B && DR_D == R) RID2F1D3F3D2R3; 
else if (DR_R == B && DR_D = LL) B1D2R1D1R3D2B3; 
} else if (DR_R == L && DR_D == B) D1IB1ID2R1D3R3D2B3; 
} else if (DR_R == L && DR_D == F) D1L1D2B1D1B3D2L3; 
else if (DR_R == F && DR_D == L) D2L1D2B1D3B3D2L3; 





continue; 












































} else if (DB_LB != D && DB_D != D) {/* DB in wrong pos*/ 
if (DB_B == F && DB_D == R) { DIF1D2L1D1L3D2EF3; 
} else if (DB_B == R && DB_D == F) { D2F1D2L1D3L3D2F3; 
else if (DB_B == R && DB_D == B) { D2R1D2F1D1F3D2R3; 
else if (DB_B == B && DB_D == R) { D3R1D2F1D3F3D2R3; 
else if (DB_B == B && DB_D == L) { D3B1D2R1D1R3D2B3;: 
else if (DB_B == L && DB_D == B) { B1D2R1D3R3D2B3; 
else if (DB_B == L && DB_D == F) { L1D2B1D1B3D2L3; 
else if (DB_B == F && DB_D == L) { D1L1D2B1D3B3D2L3; 
continue; 
} else if (DLL != D && DL_D !=D) {/* DL in wrong pos*/ 
al DL_L == F && DL_D == R) { F1ID2L1D1L3D2F3; 
else if (DL_L == R && DL_D == F) { D1F1D2L1D3L3D2F3; 
else if (DL_L == R && DL_D == B) { DIRID2F1D1F3D2R3: 
else if (DL_L == B && DL_D == R) { D2R1D2F1D3F3D2R3; 
else if (DL_L == B && DL_D == L) { D2B1D2R1D1R3D2B3; 
else if (DL_L == L && DL_D == B) { D3B1D2R1D3R3D2B3; 
else if (DL_L == L && DL_D == F) { D3L1D2B1D1B3D2L3; 
else if (DL_L == F && DL_D == L) { L1D2B1D3B3D2L3; 

J 

continue; 
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//Exit if all edge cubes in the middle layer are in the correct position and orientation. 
else if (LF_F == F && RF_F == F && 
RF_R == R && RB_R == R && 
LB_B == B && RB_B == B && 
LF_L == L && LB_L == lL) { 
break; 
} else { 
i 
All edges are not correct, but there are no edge cubes in the bottom layer that belong 
in the middle layer. Need to move an incorrectly placed cube from the middle layer 
into the bottom layer, so that the next loop can orient it correctly. 


* 
/ 
if (RF_LF != F || RF_R != R) { FID2L1D1L3D2F3; 
} else if (RB_R !J=R RB B != 8B) { R1ID2F1D1F3D2R3; 
} else if (LBB !=B LBL != L) { B1D2R1D1R3D2B3; 
} else if (LFLL [= L LF_F != F) { L1D2B1D1B3D2L3; 
} 
continue; 
} 
} while(true); 
return (true): 
} 
SolveBottomCorners.c 


#tpragma options (honor_register,assign_registers) 
#include "rubik.h" 
#include "transform.h" 


Boolean SolveBottomCorners(register RubiksCube *rub) 
short loopCount; 


// STEP 4: Move corner cubes in bottom layer into position (but not necessarily the 
// correct orientation) 


if ( CornerEquals(D,L,B,D,R,B) ) { 

} else if ( CornerEquals(D,L,F,D,R,B) ) { D2; 

} else if ( CornerEquals(D,R,F,D,R,B) ) { Dl; 

} 
f 
Given that one corner (DRB) is in the correct position, move the other corners into 
the correct position. There are (according to Taylor), 4 possibilities, clockwise 
rotation of the three other corners, counterclockwise rotation, horizontal exchange (of 
two), or diagonal exchange of two. 
* 


if ( CornerCorrect(D,R,F) ) { /* DRE correct */ 
if. ({ CornerCorrect(D,L,F) ) { /* DLF correct */ 
} else { 
R1D3L3D1R3D3L1D2; /* Exchange DLF and DLB */ 
} 
} else { 
if ( CornerCorrect(D,L,F) ) { 
D1B1D1R1D3R3B3; /* Exchange DLB and DRF */ 
} else { 
if ( CornerCorrect(D,L,B) ) { 
B1D3F3D1B3D3F1D2; /* Exchange DLF and DRF */ 
} else { 
if ( CornerEquals(D,L,B,D,L,F) ) { 
L3D1R1D3L1D1R3D3; /* DLF<-DLB<-DRF */ 
} else { 
DIR1ID3L3D1R3D3L1; /* DLF<-DRF<-DLB */ 


j 


} 
} 


//STEP 5: Twist corners in bottom layer. 


loopCount=0; 
do { 
if (++loopCount > 16) return (false); 
// At this point, all the corners in the bottom layer are in the correct positions, but 
// perhaps not in the correct orientation. 
if (DLF_F == F && DRF_R ==R && 
DRB_B == B && DLB_L == L) 
break; 
f° 
Not all of the corners are in the correct orientation. The cube has the property that 
the "twist" of corner cubes sums to zero, meaning that we have one of the following 
cases: 
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- 3 cubes needing a clockwise twist 
- 2 cubes needing a clockwise twist and 2 needing a counterclockwise twist 
- 1 cube needing a counterclockwise twist and 1 needing a clockwise twist 
- 3 cubes needing a counterclockwise twist 
The operators used in this cube solution twist one corner clockwise and one 
counterclockwise. 
* 
/ 
if (DLF_F == D) { /DLFneedsa clockwise twist */ 
L3U1L1F1UI1F3; 


//Find a cube that needing a counterclockwise turn. 


if (DLB_B == Dp) { 

LabD1F1U3F3L3U3L1D3: 
DIF1U3F3L3U3L1D3; 
else if (DRB_R == D) { 
D2F1U3F3L3U3L1D2; 
else if (DRF_F == D) { 
LabD3F1U3F3L3U3L1D1: 
D3F1U3F3L3U3L1D1; 
else {// No counterclockwise turn is needed, so we make one arbitrarily 
if (DLB_D != D) { 

goto LabD1F1U3F3L3U3L1D3; 
} else { 

goto LabD3F1U3F3L3U3L1D1; 





} 
} 
} else if (DRF_R == D) {/*DRFneeds a clockwise twist*/ 
F3U1F1R1UI1R3; 
if (DLF_L == D) { 
LabDIR1U3R3F3U3F1D3: 
DIR1LU3R3F3U3F1D3; 
} else if (DLB_B == D) { 
D2R1U3R3F3U3F1D2; 
} else if (DRB_R == D) { 
LabD3R1U3R3F3U3F1D1: 
D3R1U3R3F3U3F1D1; 
} else {// No counterclockwise turn is needed, so we make one arbitrarily 
if (DLF_D !=D) { 
goto LabDIR1U3R3F3U3F1D3; 
} else { 
goto LabD3R1U3R3F3U3F1D1; 
} 
} 
} else if (DRB_B == D) {/*DRB needs a clockwise twist*/ 
R3U1R1B1U1B3; 
if (DRF_F == D) { 
LabD1B1U3B3R3U3RI1D3: 
D1B1U3B3R3U3R1D3; 
} else if (DLF_L == D) { 
D2B1U3B3R3U3R1D2; 
} else if (DLB B == D) { 
LabD3B1U3B3R3U3RI1D1: 
D3B1U3B3R3U3R1D1; 
} else {//No counterclockwise turn is needed, so we make one arbitrarily 
if (DRF_D != D) { 
goto LabD1B1U3B3R3U3R1D3; 
} else { 
goto LabD3B1U3B3R3U3R1D1; 





} 
} else if (DLB_L == D) {/DLB needs a clockwise twist*/ 
B3U1B1L1U1L3; 
if (DRB_LR == D) [{ 
LabD1L1U3L3B3U3B1D3: 
D1L1U3L3B3U3B1D3; 
} else if (DRF_F == D) { 
DZLIVUSLIBSUIBIDZ | 
} else if (DLF_L == D) { 
LabD3L1U3L3B3U3B1D1: 
D3L1U3L3B3U3B1D1; 
-} else {//No counterclockwise turn is needed, so we make one arbitrarily 
if (DRB_D != D) { 
goto LabD1L1U3L3B3U3B1D3; 
} else { 
goto LabD3L1U3L3B3U3B1D1; 
} 


| 
J 


} else { 
// There are no corner cubes that need a clockwise twist. So there must be 3 needing 
// a counterclockwise twist. We twist one clockwise and one counterclockwise. 
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if (DLF_F !=F) { 
LIULLIFIUIFSDIFIUSE3L3IU3LID3: 
else { 
F3U1FIRIULR3DIRIU3R3F3U3F1D3; 





while(true); 
return (true); 


SolveBottomEdges.c 


Jinvr 
i 


gma options (honor_register,assign registers) 
lude "rubik.h" 


4 


lide “transtorm. h" 


Boolean SolveBottomEdges(register RubiksCube *rub) 
short loopCount; 


// STEP 6: Move edge cubes in bottom layer into position. 


if (DF_LF == F || DF_D == F) { /* FD in pos */ 
if (DLL == R || DL_D == R) { /* BD->LD->RD->BD */ 
B2D1IR3L1B2R1L3D1B2; 
} else if (DR_R == L || DR_D == L) {/* BD->RD->LD->BD */ 
B2D3R3L1B2R1L3D3B2; 
} 
} else if (DLL == L || DL_D == L) { /*- LD an pos */ 
if (DB_B == F || DBD == F) { /* RD->BD->FD->RD */ 
R2D1F3B1IR2F1B3D1R2; 
} else if (DF_LF == B || DF_D == B) {/* RD->FD->BD->RD */ 
R2D3F3B1IR2F1B3D3R2; 
} 
} else if (DR_R == R || DR_D == R) [{ i* 2D ain pos */ 


if (DF_F == B || DF_D == B) { /* LD->FD->BD->LD */ 
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L2D1B3F1L2B1F3D1L2; } else if (DB_B == D) { 
else if (DB_B == F DB_D == F) {/* LD->BD->FD->LD */ if (DR_R == D) 
L2D3B3F1L2B1F3D3L2; B1D1U3L2D2U2R1D1R3U2D2L2U1D3B3D3 ; 
if (DF_F == D) { 
else if (DB_B == B || DB_D == B) { /* BD in pos */ B1D1U3L2D2U2R1D2R3U2D2L2U1D3B3D2; 
if (DR_R == L || DR_D ==L) [{ /* FD->RD->LD->FD */ else if (DLL == D) { 
F2D1L3R1F2L1R3D1F2 B1D1U3L2D2U2R1D3R3U2D2L2U1D3B3D1 
} else if (DLL == R || DL_D == R) {/* FD->LD->RD->FD */ 
F2D3L3R1F2L1R3D3F2 } else if (DR_R == D) { 
if (DF_F == D) { 
} else { R1D1U3B2D2U2F1D1F3U2D2B2U1D3R3D3; 
/" There are no edges in their r proper place. */ } else if (DLL =D) { 
if (DF_F == L || DF_D == L) R1D1U3B2D2U2F1D2F3U2D2B2U1D3R3D2; 
FILID1L3D3F2R3D3R1DIF1; else if (DB_B == D) { 
else if (DF_F == B || DF_D == B) { R1D1U3B2D2U2F1D3F3U2D2B2U1D3R3D1; 
R2L2UIR2L2D2R2L2U1R2L2; 
else if (DF_F == R || DF_D == R) { 
,1F1D1F3D3R2B3D3B1D1R1 } while(true) ; 


} 
J 


//STEP 7: Flip edges in bottom layer. 


loopCount = 0; 
do { 
if (++loopCount > 24) return false; 
//At this point, all the edge cubes in the bottom layer are in the correct positions, but 
//perhaps not in the correct orientation. 


//Exit if all edge cubes have the proper orientation. 


if (DF_F == F && DR_R ==R && 
DB B==B && DLL == lL) 
Drea: 


// At least one edge cubes does not have the proper orientation. The cube has the 
// property that an even number of edge cubes need to be flipped. 








if (DF_F == D) 
if (DLL == D) { 
FIDIU3R2D2U2L1D1L3U2D2R2U1D3F3D3; 
| else if (DB B =D) { 
FIDIU3R2D2U2L1ID2L3U2D2R2U1D3F3D2 ; 
else if (DR R ==D) { 
FIDIU3R2D2U2L1D3L3U2D2R2U1D3F3D1; 
} else if (DL_L == D) { 
if (DB _B = D) 
LID1IU3F2D2U2B1D1B3U2D2F2U1D3L3D3; 
} else if (DR_R =D) { 
Bie hah se orl a 
} else if (DF_F == D) { 
L1D1U3F2D2U (7B1D3B302D2F2U1D3L3D1; 
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rerurn (true): 


transform.h 


// Flmove transforms the cube in response to a clockwise turn of the Front face. 
// F3move represents a counter-clockwise turn. Similarly for the other faces. 


define Flmove \ 


Rot4(ULF_U,DLF_L,DRF_D,URF_R); \ 
Rot4(ULF_L,DLF_D,DRF_R,URF_U); \ 
Rot4(ULF_F,DLF_F,DRF_F,URF_F); \ 
Rot4(UF_U,LF_L,DF_D,RF_R); \ 
Rot4(UF_F,LF_F,DF_F,RF F); 


...and so on... 


//This file contains the permutations used to transform the cube during the calculation 
//of the solution during the first cae to SolveRubiksCube. 


Fl Flmove; 
F3move; 
Limove; 
L3move; 
Rlmove; 
R3move; 
Blmove; 
B3move; 
Ulmove; 
fine U3 U3move; 
define Dl Dimove; 
define D3 D3move; 
F2 \ 


define 


























_U,DREF_D); 


SSS SS SS SSS SE 


BUF COWH DEEPA 


SS 


YY 








Rot2(ULF_L,DRF_R); \ 
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Rot2(ULF_F,DRF_F); Rot2(DLF_D,URF_U); \ 
Rot2(DLF_L,URF_R); Rot2(DLF_F,URF_F); \ 
Rot2(UF_U,DF_D);  Rot2(UF_F,DF_F); \ 
Rot2(LF_L,RF_R); Rot2(LF_F,RF_F); \ 
M(F) ;M(F); 





Rot2(ULF_U,DLB_D); Rot2(ULF_L,DLB_L); \ 
Rot2(ULF_F,DLB_B); Rot2(DLF_D,ULB_U); \ 
Rot2(DLF_L,ULB_L); Rot2(DLF_F,ULB_B); \ 
Rot2(UL_U,DL_D);  Rot2(UL_L,DL_L); \ 
Rot2(LF_L,LB_L) Rot2(LF_F,LB_B); \ 
M(L) ;M(L); 


define R2 \ 





Rot2(URF_U,DRB_D); Rot2(URF_R,DRB_R); \ 
Rot2(URF_F,DRB_B); Rot2(DRF_D,URB_U); \ 
Rot2(DRF_R,URB_R); Rot2(DRF_F,URB_B); \ 
Rot2(UR_U,DR_D);  Rot2(UR_R,DR_R); \ 
Rot2(RF_R,RB R) Rot2(RF_F,RB_B); \ 
M(R) ;M(R); 

and so on... 





define R3D1R1 \ Upper layer transforms 


Rot4(DLF_D,DLB_D,DRF_F,URF_F) ; 
Rot4(DLF_L,DLB_B,DRF_R,URF_U) ; 
Rot4(DLF_F,DLB_L,DRF_D,URF_R) ; 
( 
( 


BO ae ge 


Rot4(RF_R,DF_F,DL_L,DB_B); \ 
Rot4(RF_F,DF_D,DL_D,DB_D); \ 
M(r);M(D);M(R); 
define B3D1B1 \ 
Rot4(DLF_D,DRB_R,URB_R,DRF_D); 
Rot4(DLF_L,DRB_B,URB_U,DRF F); 
Rot4(DLF_F,DRB_D,URB_B,DRF_R); 
( 
( 


PO ge pg 


Rot4(RB_R,DR_D,DF_D,DL_D); \ 
Rot4(RB_B,DR_R,DF_F,DL_L); \ 
M(b) ;M(D) ;M(B) ; 

...much, much more of the same... 





Middle layer transforms 
#define D3F1D2LIDIL3D2F3 \ 


Rot3(DLF_D,DLB_D,DRF_R); \ 
Rot3(DLF_L,DLB_B,DRF_D); \ 
Rot3(DLF_F,DLB_L,DRF F); \ 
Rot4(RF_R,DF_D,RF_F,DF_F); \ 
Rot4(DR_D,DB_D,DR_R,DB_B); \ 
M(d) ;M(F) :M(D) sM(D) ;M(L) ;M(D) sM(1) ;M(D) ;M(D) sM(£) ; 
define FID2LIDIL3D2F3 \ 
Rot4(DLF_D,DRB_D,DRF_D,DLB B); \ 
Rot4(DLF_L,DRB_R,DRF_F,DLB_L); \ 
Rot4(DLF_F,DRB_B,DRF_R,DLB D); \ 
Rot4(RF_R,DL_D,DB_D,DF_F); \ 
Rot4(RF_F,DL_L,DB_B,DF_D); \ 
M(F) ;M(D) ;M(D) ;M(L) ;M(D) ;M(1) ;M(D) ;M(D) sM(£) ; 
...much more of the same... 





Bottom Layer transforms 
#tdefine RID3L3D1R3D3L1D2 \ 


Rot6(DLF_D,DLB_D,DLF_F,DLB_L,DLF_L,DLB_B); \ 
Rot3(DRF_D,DRF_R,DRF_F); \ © 
Rot3(DRB_D,DRB_B,DRB_R); \ 
Rot4(DL_D,DB_D,DR_D,DF_D); \ 
Rot4(DL_L,DB_B,DR_R,DF_F); \ 
M(R) ;M(d) ;M(1) ;M(D) ;:M(r) sM(d) ;M(L) ;M(D) ;M(D) ; 
define DIBIDIR1ID3R3B3 \ 
Rot3(DLF_D,DLF_F,DLF_L); \ 
(DRF_D,DLB_D,DRF_F,DLB B,DRF_R,DLB_L); \ 
Rot4(DL_D,DB_D,DF_F,DR_D); \ 
Rot4(DL_L,DB_B,DF_D,DR_R); \ 
M(D) :M(B) :M(D) :M(R) 3M(d) ;M(r) sM(b) ; 
...much more of the same... 











dof L3U1LIF1U1E3 \ Corner Twist transforms 
erine 














Rot3(ULF_U,ULF_L,ULF_F); \ 
Rot3(DLF_D,DLF_F,DLF_L); \ 
Rot9(URF_U,URB_U,ULB_U,URF_F,URB_R,ULB_B,URF_R,URB_B, \ 
ULB_L); \ 

Rot5(UL_U,UF_F,UR_R,LF_L,UB_U); \ 
Rot5(UL_L,UF_U,UR_U,LF_F,UB_B); \ 
M(1);M(U) ;M(L) ;M(F) ;M(U) ;M(£) ; 

define DIF1U3F3L3U3L1D3 \ 
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NEW! Version 2.0 - Supports PPC & Fat Binary 


PatchWorks 


Builds Updaters Without Programming 


PatchWorks has many options, but only one function: 
to create updater applications for distribution via public 
channels (e.g., online services). 


Before the advent of PatchWorks, creating an updater 
was a project in itself, one that consumed valuable 
programmer time which could more profitably be spent 
on revenue-producing projects. 


With PatchWorks, you create an updater in minutes. 
Since there’s no coding or scripting, no bugs are 
introduced. Just fill in a dialog, and PatchWorks does the 
rest! 


Distribute updaters frequently to reflect maintenance 
releases, and watch your tech support and fulfillment 
costs fall dramatically. 


Most important, your customers will know you care. 


—————————————— PatchWorks™ 
Offline™ 3.0.5 (APPL, OFFL) 
OfflLine™ 4.0 (APPL, OFFL) 
OffLine Updater 
PW Log - Offline™ 4.0 


Compression @ Rewrite updater 


© Merge resources into updater 





Name 


Type 
Creator 


Old File 


Screen Name 


k 
; Name Offling 
New File { 
Mod Date Date patched OO Copy all 


Features 


¢ Works with apps, INITs, cdevs, fonts, drivers, etc. 

¢ Now supports PPC, fat binary, & 4D apps 

¢ Customizable user interface 

¢ Updaters support multiple old versions 

¢ Resource compression (diffing) produces small updaters 
¢ Preserves personalization data (name, serial #, etc.) 

¢ Updater distribution is unrestricted & royalty-free 


Pricing: Begins at $195. Call for more information. 


2200 NW Corporate Blvd. 
Boca Raton, FL 33431 
Tel (407) 241-0308 * FAX (407) 241-3195 
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Apple’s Installer 4.0 _ !nstallyour product using the familiar interface 
— of Apple's Installer (the same program your 


ScriptGen Pro 2.0 customers use to install System software). 








New in ScriptGen Pro 2.0 | 

e Installer 4.0 Support | 
_¢@ Developer Hooks 

¢ FolderCopies 
@ 


“Its intuitive interface makes creating Installer 
scripts blissfully simple and quick” 
MacTech Magazine 


| 7110 Glendora Avenue 











Functional Demo Available: — 

AppleLink: Third Party Demos ScriptGen Pro: $169 STEP’ ‘Dallas, Texas 75230 
AOL: Developers Forum : 214-360-9301 

CIS: Developers Forum InstallerPack: $219 so FTWARE 214-360-0127 fax 
eWorld ScriptGen Pro is a trademark of StepUp Software. Apple is a registered trademark of Apple Computer % Oe 


* Requires additional licensing 





Rot3(ULF_U,ULF_F,ULF_L); \ 
Row (URF_U, ULB_L, URB_B, URF_R, ULB_B, URB_R,URF_F, ULB Uy 4 

















=a os Rot3(DLB_D, DLB By DEBE “\ 
Rot5(UL_U,UB_U,LF_L,UR_R,UF_F); \ 
Rot5 (UL_L,UB_B,LF_F,UR_U,UF_U); - 
: M(D) sM(E) sM(u) sM(£) sM(Z) :M(u) sM(L) 3M(d) 
Stuck with Pascal source code? much more of the same. 
Edge exchanges 
” 
Want to move to C++ #tdefine F1D1U3R2D2U2L1D1L3U2D2R2U1D3F3D3 \ 
Rot2(DL_D,DL_L); \ 
. : . Rot2(DF_D,DF_F); \ 
OP2CPlus is a Macintosh tool for converting M(F) :M(D) :M(u) :M(R) :M(R) $M(D) sM(D) ;M(U) sM(U) sM(L); \ 
Object Pascal source code to C++ source code. It a me sM(U) ; sM(U) ;M(D) ;M(D) ;M(R) sM(R) ;M(U) ;M(d); \ 
has already been used to translate hundreds of define F1D1U3R2D2U2L1D2L3U2D2R2U1D3F3D2 \ 
. . Rot2(DF_D,DF_F); 
thousands of lines of Object Pascal to C++. Rot2 (DBD DBUB). | 
os M(F) ;M(D) ;M(u) ;M(R) ;M(R); ore any eae MUL) 4 
Ease your transition to OpenDoc or PowerPC M(D) sM(D) M(1) sM(U) MCU) :M(D) :M(D) :M(R) sM(R) sM(U); 
M(d) ;M(£) ;M(D) ;M(D) ; 
) Convert in days instead of months .-much more of the same... 
LJ Generates C++ classes [You can find the full source to Bob’s solution in our usual 
OQ Works with Mac App 9 or3 online sites. Please see page 2 for details — Ed stb] 2 





.) Translates Think or MPW Pascal 
J Full ANSI C source code included 
QO) Just $895 


Graphic Magic Inc, 180 Seventh Ave, Suite 201 


Santa Cruz CA 95062 __‘ Tel (408) 464 1949 
Fax (408) 464 0731 AppleLink GRAPHICMAGIC To receive information on any products 


advertised in this issue, send your request 


via Internet: 
productinfo@xplain.com 
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By Mark B. Baldwin and Steve Howard, Symantec Technical Support 


SAVINNEDSON 





This monthly column, written 
by Symantec’s Technical 
Support Engineers, aims to 
provide you with technical 
information based on the use 
of Symantec products. 


Q. Why do I get bus errors when I 
create a CStyleText object by using the 
constructor with arguments? 


A. In the process of upgrading the TCL, 
constructors with arguments were added 
to the classes. In this case, constructors 
with arguments do not create a new 
handle to a TERec, the macTE data 
member of the CStyleText object. To 
work around this, call the constructor 
with no arguments and call the 
IStyleTextXO method. 


Q. I am having trouble using sizeofO 
with printfO. For example: 


printf("char size is %d.", sizeof(char)); 


Outputs "char size is 0." Why dol get 
the wrong result? 


A. The output is wrong because the 
return value of the sizeofQ function is a 
size_t (an unsigned long). Use an %1d 
rather than a %d as a format specifier. 
Thus, the correct syntax is 


"orintf("The size of a char is %ld.", 
sizeof (char));" 


Q. How can I avoid problems deleting 
heap objects whose references are on the 
stack when using exception handling? 
The pointer (which is on the stack) to 
the object becomes invalid when the 
stack unwinds and only the destructors 
for automatic objects are guaranteed to 
be called when an exception is thrown. 
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A. To handle this, declare pointers as volatile. Last month we 
explained why you should use the volatile type. Below is a 
practical example. Use volatile file pointers so that stack 
unwinding does not reset the value of the pointer (prohibiting 
the file from being closed). 


funClass * volatile funClassPtr: 
funClassPtr = NULL: 
int myInt = 1; 


// Syntax for volatile declaration 
// Pointer to NULL guarantees delete as safe. 
// Watch in debugger to see 

// the stack unwind. 


T+ YT { 


i y 


funClassPtr = TCL_NEW(funClass, ()) ;//macro for new operator 
myInt = 2; //put new value on stack 
_ Failure (2, 100); // Force exception 


cat ch_all () { //catch block 


delete funClassPtr; //this calls destructor. 


// myInt is reset to 1, delete removes the object from the heap 


end_t ry_ //end of try block 


Q. How can I use exception handling without using the Think 
Class Library? 


A. To use exception handling without the Think Class Library, 
include BRLib and Exceptions.cp in your project. Also, compile 
with the directive #define NO_TCL 

The four macros used to make exception handling work 
correctly are: 


AUTO_DESTRUCT_OBJECT 
TCL_NEW 
TCL_END_CONSTRUCTOR 
TCL_START_DESTRUCTOR 


The macro AUTO_DESTRUCT_OBJECT will guarantee that the 
destructor is called for an automatic object on the stack. A 
destructor will only work on a completely constructed object. 
TCL_END_CONSTRUCTOR helps the compiler to determine the 
complete construction of an object. 

Here’s an example that shows how the macros are used. 


class funClass TCL _AUTO_DESTRUCT_OBJECT //macro in class header 


public: 
funClass() { 
cout<< "In constructor."<<endl1; 
char * myStr = new char[64]; 
TCL_END_ CONSTRUCTOR 
} 
virtual ~funClass() { 
TCL _START DESTRUCTOR 
eout<s "In destructor."<<endl: 
delete [] myStr; 
} 


// no arg constructor 


// allocate memory 
// End of the constructor 


// virtual destructor 
// Beginning of the destructor 


// deallocate memory 
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Tools Plus 


Tools Plus gives you the routines you need 
to create a professional looking user interface. 
Then we make it work. It’s that simple. 


For THINK C and Symantec C/C++ (6.0.4 and later) or THINK Pascal 
Over 170 high-powered “set and forget” routines that automate and enhance: 
event handling, windows, the tool bar, floating palettes, cursors, buttons, 


Language 
COCc/C++ 
(> Pascal 
@ Both 


XX] Saves Time 
EJ] Saves Money 
XJ] Easy to Use 


picture buttons, scroll bars, menus (pull-down, hierarchical and pop-up), 


Box 70022 © 2441 Lakeshore Road West 
Oakville, Ontario * Canada L6L 6M9 
Phone: (416) 219-5628 

CompuServe: 73424,2507 

Internet: 73424.2507@CompuServe.com 


Tools Plus for C/C++ or Pascal only $149 US or $199 US for both. 
(We accept VISA and American Express. Add $10 for shipping.) 


Q. Where can I get the Quickdraw GX headers? 


A. APDA has a Quickdraw GX Developer’s Kit which contains 
a CD with the electronic versions of Inside Macintosh for GX, 
headers, required system software components, and excellent 
examples which are compilable under THINK C or Symantec 
C++. For ordering information, call (800) 282-2732. [If all you 
need is the header files, check out the MacTech Magazine online 
sites. See page 2 for details — Ed stb] 


Q. When I build an application with the TCL, the application 
does not seem to be scriptable. How can I make it scriptable? 


A. The default flags for the SIZE Resource of the application 
-are set to not receive Background NULL Events. Make sure that 
the flags for your application have this bit turned on. 


Q. I have a program that I’m converting from DOS and would 
like to be able to draw some simple graphics to the console 
window. How can I do that? 


A. Don’t do it. If you draw to the console window, you will 
not receive update events. However, if you just can’t help 
yourself from going down this path, here is how to do it. 


fHinclude <iostream.h> 


WindowPtr myWindow; // To be used for the console window. 
void main (void) 
coun <<, 
myWindow = FrontWindow() ; 
SetPort (myWindow) ; 
PenNormal() ; 
LineTo(100,47); 


//A simple way to show the console. 
//Get a pointer to the console. 

//Set the port for drawing. 

//Set the pen for drawing. 

//Draw a line. 
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list boxes, fields, Edit menu, clipboard, Dynamic Alerts, and more... 
Easy to learn and easy to use 
Substantial code reduction 
Dramatic code simplification 
Significantly less debugging 
System 6 and 7 compatible 


e For novice, intermediate and 
advanced programmers 
e Runs fast; needs little memory or disk space 


e Safer than toolbox routines 


e¢ No royalties 


Free Evaluation Kit: 


CompuServe GO MACDEV, 
C & Pascal library, file name: TP252.SEA 


AppleLink Software Sampler/Software 
Collection/Programmer Tools/Tools Plus 


Disk also available by mail. 





Q. If I am mixing C and C++ code, should I turn on the option 
to use Native Floating Point format? 


A. Yes. Symantec’s C++ compiler is using the Native Floating 
Point format. To make sure that your floating point 
calculations give you the expected results, turn on Use Native 
Floating Point in the options for the C compiler. 


Q. Will Symantec be updating the THINK Reference Databases? 


A. Yes. THINK Reference is undergoing a massive overhaul. It 
will be updated for the Universal Headers and the Think Class 
Library, and will include new databases for C++ Error 
Messages. As before, references will be hyperlinked for easy 
access to information. 


Special thanks to: Craig Conner, Colen Garoutte-Carson, Rick 
Hartmann, Michael Hopkins, Scott Morison, Celso Barriga, 
Kevin Irlen, Yuen Li, and Chris Prinos. 


bal 





To receive information 
on any products 
advertised in this issue, 


send your request 
via Internet: 
productinfo@xplain.com 
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MacAnalyst and MacDesigner 


Computer Aided Software Engineering For The Macintosh 










Dictionary: SimpleApp.DD 


& NamejtWindow 





UD < 
TPalette 
TPalette' fTool 
TPalette.DoMouseCommand 
TPalette. Draw 
TShape 
TShape'fPosition  —«- fas ieee 
TShape’ fSelected DoMouseCommand 
TShape' fType SetupMenus 
TShape . Draw 
TShape . Free 
TShape. Initialize 
TShape . Read 
TShape.Select 
TShave Write © seg (77 peers pale 

DoMenuCommand 
TWindow' fDocument SetupMenus 
TWindow' fPalette J 
TWindow.Close 










ERD: SimpleApp.Class: Main 






















Initialize 
Insert 







TCircle 
fRedi t 


OOA/OOD includes OMT, Booch, Coad/Yourdon, Shlaer/Mellor... 


STD: AnalyzerRT.STD: State 
















Manage 
Receiver 
1 


— Command=StopScan Command=StartScan__ 
7 receiver Enabled Receiver Enabled=FALSE Receiver Enabled=TRUE 


=FALSE 






Table: analyzer 
Name: = 
Displayed —— 













.OFD: 0: ] Se — = 
“t— video output P 
——— Key Entry 


~<a@— Yideo Output 








(rie) 
(oie) 






INPUTS 
ee Receiver Enable’ 


yee 
Trigger Exists 





exveee snsoeed™ 
aenoeenere 


casbsnsessbscecbecossesesess Receiver Command 
Enabled . 















ss benbusesscienee ) 2 wee Trigger Type 


noves tesennenassrreree! 


it : : rigger 
- 7 : _ Type 
“~ a teeeeenes TRUE" vewenenens ss DIE” ov : : ; 2 | 
Nee ge ee es a = 





client 
client address 
client_name 

cl ient_number 
order form 

order form_date 
order form_number 
order form_total 














order | ine_ruaber + 
order | ine_quantity + 











\ Code: Order.SQL 
CREATE TABLE client 
¢ 





client_number INTEGER NOT NULL, 
clientuname CHARACTER(40 >, 
clientuaddress CHARACTER‘40>, 
PRIMARY KEY (cl ient_number > 














order | ine_number 
order | ine_quanti ty 
product 

a 









r 
er form 






ber INTEGER NOT NULL, 


senenenscessnneencsensenssonsanessnacenees *produc t_number 
produc t_name 

product_descr iption 

produc t_pr ice 





@CHARACTER4 |e 
@DECIMALS .2] 4 
@INTEGER = fia 




































client_name 
clientuaddress 


INTEGER NOT NULL, 
order formnumber >, 
client number > REFERENCES client 






mr line 
“order | ine_number 
order | ine_quanti ty 
order form_number 
Pproduc t_number 











order form_date 
order form_total 
Pcl ientnumber 
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By Scott T Boyd and John Kawakami 


It there's something you'd like to see here, please drop us a 
note at editorial@xplain.com. 

In case you're not familiar with Universal Resource Locator 
(URL) format, it’s essentially 

<servicekind>://<servername>/<pathname>. 
Get yourself a good ftp client (we recommend Anarchie, 
available at all of your favorite info-mac archives), and a 
reasonably-priced web browser (we recommend Netscape) and 
start rummaging around the net. We like to think of it as 
Mother Nature’s hard drive. 


Interesting Developer Places 

The place to start! Robert Lentz has poured a ton of great 
information into this web site: 
http://www.astro.nwu.edu/lentz/mac/programming/home-prog. html 


Alpha ftp://cs.rice.edu/public/Alpha 
alt.sources.mac __ ftp://ftpbio.bgsu.edu/alt.sources.mac 
Apple http://www.apple.com 

seealso __http://www.austin.apple.com 

seealso http://www. info.apple.com/dev/ 
Applescript ftp://gaea.kgs.ukans.edu/applescript 
BBEdit ftp://ftp.netcom.com/pub/bb/bbsw 
CodeWarrior http://www.iquest.com/~fairgate 


Celestin’s Internet Resources for Mac Developers 
http://www.teleport.com/~cci/directories/irfmd/irfmd.html 


Dylan ftp://cambridge.apple.com/pub/dylan 
| see also __http://legend.gwydion.cs.cmu.edu:8001/dylan 
Lisp http://www.cs.rochester.edu/u/miller/alu.html 


MacTechMagazine ftp://ftp.netcom.com/pub/xp/xplain 
Nick’s Place http://www.pitt.edu/~nick/ 


OpenDoc ftp://cil.org 

MacGL ftp://ftp.netcom.com/pub/lo/loceff 
MacNosy ftp://ftp.netcom.com/pub/ma/macnosy 
Smalltalk http://www.qks.com 


Symantec ftp://devtools.symantec.com/Macintosh/Updaters/DevTools 


TCL stuff ftp://ics.uci.edu/mac 
seealso  ftp://daemon.ncsa.uiuc.edu/TCL 
Sources 
NewsWatcher ftp://ftp.acns.nwu.edu/pub/newswatcher/ 
Info-Mac 


info-mac archives ftp://amug.org/info-mac 
ftp://mac.archive.umich.edu/mac 
A comprehensive list of Info-Mac and other archives is included 


with Anarchie, available at these sites or the Peter Lewis site. 
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We’ve Moved! 

URL’s change from time to time and Netcom made sure that 

ours did. Someday soon, we'll have a home page on a machine 

of our own, and we'll keep the most current references there. 

Of course, that means that we'll have to change one more time. 

In the meantime, you can find us at: 
ftp://ftp.netcom.com/pub/xp/xplain 


People & Places 

Apple ftp://ftp.apple.com/ 

Apple developer http://www.support.apple.com 

Best of the Net http://nearnet.gnn.com/gnn/gnn.html 
Bill Modesitt ftp://ftp.maui.com/pub/mauisw 
Consensus http://www.consensus.com:8300 


http://www.iquest.com/~fairgate 
ftp://amug.org/pub/peterlewis 


Paul Robichaux 

Peter Lewis tcp/ip apps 

QuickCam 
http://www.engin.umich.edu/~friscolr/QuickCamtm/readme html 


Macintosh General Stuff 
Macintosh Vendor Directory 
http://rever.nmsu.edu/~elharo/faq/vendor.html. 


Newsgroups 
comp.sys.mac.programmer.*, where *is “digests”, “info”, “help”, 
“tools”, or “misc”, are the main Macintosh programmer hangouts. 


Getting a nicer Internet interface 

The Internet Adapter turns a simple unix shell account into a 
SLIP connection. Telnet to tia.marketplace.com, or point your 
www browser to marketplace.com for info. (I’ve been using it 
for a month and have had no problems. Consider this a thumbs 
up from a satisfied customer — jk/ 


ISDN = Faster Internet on the cheap 

The next hot topic in home and home office Internet looks like 
ISDN. You just knew the phone company would finally figure 
out what to do with this technology! ISDN prices are dropping 
fast. For an incredibly comprehensive index of ISDN info, check 
out http://alumni.caltech.edu/~dank/isdn/ 


Don’t try this at home 
If this is any indication, the phonebook of the future is going to 
have a lot more than a first initial, last name, and a phone 
number: http://www.umich.edu/~dugsong/index.html#ButterBoy 
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By Scott T Boyd, Editor 


EVENBETTERBUSERROR AGAIN? 
Your printed copy of EvenBetterBusError in the December issue has a 
bug. Your constant SizeOfCodeBlock is computed to include only 
the code, but then is used as if it contained both the code and the 
constant BuggyCodeWroteToNil. The effective address of the PEA 
just before _DebugStr in the VBL task is outside the system heap 
block you obtained with _NewPtr. 

Check it out. The effect is that after legitimately dropping into the 
debugger, one might see almost anything as the debugging string, 
hardly helpful! 

Fix it by moving the EndOfCodeBlock label after the DC, not 
before. Does your assembler complain about labels with no contents? 
Fix that by putting another dummy DC after EndOfCodeBlock. 

I wish we could ignore the dumbbells who claim their bugs are 
caused by the detection mechanism, but what if one needs their software!?! 

— Emerson Mitchell, 72257.2215@compuserve.com 


[Yes, indeed, it’s a bug. It’s also missing an ALIGN to get it on a nice 
boundary. That'll teach me to assemble and link without actually 
installing and running. Another lesson learned. Thanks for the 
correction. As for the dumbbells, we can't fix them, but a whole lot of 
folks now know to use EBBE when testing software (theirs and others). 
The “culprit” that I wrote about has already rewritten chunks of their 
product and has a new appreciation for low-level debugging tools. If 
you see other software that could use fixes along these lines, please drop 
us anote — Ed stb] 





Tuis Is CALIFORNIA, AND It’s 1994 
Scott, 14.4K Internet access? Why bother, when PacBell will install an 
ISDN line in your home for less than $100, and companies like 
Internex will give you ISDN access for $49/month? 
That’s what J did. With an Ascend router, I get ISDN into my local 
Ethernet, and we both have high speed access. Whee! 
— David Ramsey, ramsey@be.com 


[That sounds terrific, but I want to host my own Internet services (Web 
server, fip site, and so forth). I can do those now, albeit slowly, with my 
constant 14.4K connection. A constant ISDN connection in this area 
would run more than three times what I’m paying now. ISDN 
equipment costs substantially more than my cheap modem, too. 
Ascend routers get you up and over the $1000 mark pretty quickly. Of 
course, these reasons don’t mean I’m not jealous! — Ed stb] 





ANOTHER BuG? 
I just discovered a nasty “gotcha” in a tip I submitted to MacTech, 
which was printed a few months ago. 

If you hack a folder alias with ResEdit to look as if it were an alias 
to the Desktop Folder, don’t ever ask Finder to “Get Info...” on the 
hacked alias and then try to “Find Original.” If you do, Finder crashes; 
dramatically or quietly, depending on its mood at the time. 

I hope this doesn’t mean I have to give back the “tip of the 
month” money for that one, ’cuz I already spent it! 

— Lee David Rimar 
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FTP’s A Goon IDEA, BUT... 
I'd like to thank you for maintaining an ftp-site, and a net-presence in 
general. I would, however, encourage you to seek a mirror site. I’ve 
had very little luck connecting to ftp.netcom.com. And most of the 
few times I have been able to connect, the response time has been 
unbearably slow. 
— Robert Fisher, malirath @zilker.net 


[We don't know what’s up with Netcom, but we’re not happy with it 
either. We'll be getting our own site online sometime soon. Thanks for 
the suggestion about a mirror site — we'll keep you posted — Ed stb] 





DEVELOP AND MACTECH EDITORS READ EACH OTHER 
In response to Steve Kiene’s letter in the December issue: 

I enjoyed Steve Kiene’s well-written letter to MacTech in the 
December issue — even though I’m the editor of Apple’s own technical 
journal, develop. We try not to make develop a Stars and Stripes, feel- 
good magazine either, although we do need to push the company’s 
technology direction a bit to avoid incompatibilities for developers 
down the road. 

My forthcoming editorial in Issue 21 of develop is on the subject 
of my own emotional attachment to the Mac, so I especially enjoyed 
the paragraph on your similar attachment. I hope your attachment 
remains — and that you’re a develop reader :- ) 

Regards, 

— Caroline Rose, CROSE@applelink.apple.com 





LIST VERSUS OBJECT IN SMALLTALK 
Kevin O'Neill wrote: 
I managed to get the time to read your article in MacTech 
last night. It was great and I hope to see more. 
I'd like to know more about how you decided to use a 
list to store the drag data rather than an object of a specific 
class. I found myself flipping back to the stop where you 
defined the list so that I could be sure what was being 
referred to in the various ‘data@x’ statements. 
Actually it turns out that we should have used a subclass of <List> 
which we call a <DragPackage> class. At the time it wasn’t clear 
whether it would be a private data structure for use among a few 
objects, or whether it would have a public/client API. Since the time 
that article was written we have concluded that there really should be 
some behavior attached to the drag-data to enable it to serve a more 
general usage. 
--) That was good instinct/observation on your patt... 
Thanks for the comments and feedback. 
— Dave S., quasar@qks.com 





EVENBETTERBUSERROR YET AGAIN (EBBEYA) 
The wrath over EvenBetterBusError (Editor's Page, November 1994) is 
directed to the wrong target. The typical Mac developer, struggling 
against all odds to earn a living from a platform intentionally restrained 
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to single-digit shares of the business market, is not helped by the 
thought police yelling “bonehead” and “liar” at him. Anyone who says 
of a block of 68K code, “As you can see, it’s pretty simple” is well out 
of touch with the real world of business applications programming. 
Rather than excoriate the poor developer, why not direct your 
flame towards the source of the problem, the tool developers? 
EvenBetterBusError is just one of a scattered set of poorly- 
documented, poorly-designed and poorly-distributed hacks, each of 
which is intended to address some gaping problem in Mac 
development tools. Why can’t the functions of all such debugging aids 
be bundled with the tools themselves, in a simple-to-use format? Why 
don’t more development environments automatically (or optionally) 
check for such detectable “nefarious acts” as using DisposeHandle on 
a resource, dereferencing NIL, or calling DisposeHandle twice? Why 
isn't a simple, high-level form of Discipline standard with all 
languages? Finally, why do toolmakers treat source-level debugging as 
unmanly, and therefore of no interest? Some of these hacks give 
results in a machine level so low as to be useful to only a smattering 
of programmers — I guess that leaves the rest of us as “boneheads”. 
Think Pascal was (as is) fairly good on some of these issues, so 
why have more recent environments taken steps backwards from that 
level of assistance? It should not be necessary for the beleaguered 
Mac developer to conduct a fishing expedition through CDs and 
online sources to find all of the hacks needed to fix the obvious 
omissions of the development environments. 
— Kevin Killion Stone House Systems, Inc. shs@mcs.com 


[Thanks for your excellent letter. A few thoughts came to mind while I 
was reading your letter, and here they are — Ed stb] 

First, someone has (as you may have already noticed in the 
December issue) put a bunch of the tools together in the form of 
Qc™. They brought together many of the tools, wrapped them 
together in a nice package, and are doing what they can to get them 
out to developers. At $100, it’s cheap at twice the price. 

Second, I'll cop to playing the role of thought police. Somebody 
has to do it. Apple sure isn’t, and, as you pointed out, neither is 
Symantec or Metrowerks. The aspersions were cast at a vendor who 
chose to blame the tool rather than address their serious, yet known bug. 
Ignorance is one thing, but blaming EBBE was a wrong thing to do. 

In a followup conversation with that particular vendor, the 
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product manager told me that he was “horrified” once he had read my 
editorial. The right thing has happened now - the product has been 
repaired, and we're a little better off for them better understanding the 
situation, the available tools, and their responsibility to test their 
software with whatever tools are available. 

Third, let’s not blame someone for the existing tools being poorly 
documented and poorly distributed. Why? Greg, Bo3b, and others 
kindly and generously donated tools. Those tools are available on 
every online service and on Apple’s CDs, as well as our online sites. 
Sure, their documentation isn’t great, but at least it exists to some 
degree. I'm sure you didn’t mean to put them down, but, having been 
there when these tools were written (and having written the 
beginnings of one of them myself), let’s praise them for not only 
making us aware of the problems, but also giving us tools (albeit 
crude) to address the problems. 

Third-and-a-half, the three principal problems that 
DoubleTrouble, DisposeResource, and EBBE address are problems that 
we (the System 7 team at the time) realized were bigger problems than 
we had known during the System 7 effort. Greg wrote the tools after 
he had debugged hundreds of “incompatible” pieces of software. 
sometimes it just takes a while to realize the need for a specific tool. 
Without his debugging efforts, we still wouldn't have these tools. 

Fourth, I totally agree that environment vendors need to provide 
more and better tools. Some vendors have. For example, QKS 
SmalltalkAgents knows about various classes of memory, allocates 
most things for you, and deallocates when your done. It’s nearly 
impossible to make some of these classic mistakes with an 
environment like STA. 

Finally, 'd say that it’s time to put some blame on Apple. Isn't it 
time that they develop a system which makes it nearly impossible to 
make these kinds of mistakes? Now that we've had a decade’s worth 
of experience, don’t we have a pretty good idea what the common 
mistakes and failure modes are? Couldn't we find a way to eliminate 
some of them? QKS has. Dylan does. NeXT has. Sun is working on 
it. Taligent has put a lot of effort into it. When is Apple going to step 
out and take a leadership role in making the developer's job easier, 
safer, and more rewarding? 

— Ed stb 
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By Scott T Boyd, Editor 








URL STANDARD APPLE EVENT SUITE 


Uniform Resource Locators (URLs) are a standard notation for 
identifying the locations of files and other resources on the 
Internet. Mac TCP/IP networking programs often make use 
of each other as “helper programs”. To make it easier to do 
this, some Mac Internet software developers have designed a 
simple standard for Apple Events programs can send to each 
other to ask them to process URLs. Here’s a brief overview of 
the events. Suite code: ‘GURL’ 
The geturl event 
Get an object referenced by an URL and display it in a 
window or save it to a file: 

geturl <URL:...> [to <file>] 

retrieve the object reference by the URL 

Result: small integer — result code 
The fetchurl event 
Get an object referenced by an URL and return the object as 
the event result 

fetchurl <URL:...> 

Result: the referenced object, usually text 
Servers must support the following formats for the URLs: 

(1) scheme:... (the “canonical form”) 

(2) <scheme:...> 

(3) URL:scheme:... 

(4) <URL:scheme:...> 
This standard was designed by John Hardin, Peter Lewis, 
Steve Dorner, Farhad Anklesarian, Aleksandar Totic, and other 
Mac TCP/IP developers. It was edited by John Norstad 


<URL:mailto;;-norstad@nwu.edu>, and is available in full at: 
ftp://ftp.acns.nwu.edu/pub/newswatcher/urlae-standard.txt 





BBEpIt 3.1 


Bare Bones Software, Inc. announced version 3.1 of their 
BBEdit text editor. The new version includes “soft” text 
wrapping, interaction with development environments not 
previously supported, electronic documentation, and an all- 
new packaging and delivery system. 

BBEdit 3.1 features new “soft” text wrapping. Previous 
versions of BBEdit required users to insert carriage returns in 
order to break lines, and to manually re-format the text while 
editing. BBEdit 3.1 now offers the option to wrap lines 
without inserting carriage returns, and will automatically re- 
flow lines as necessary when the user inserts or deletes text. 

BBEdit now supports integration with THINK C, 
Symantec C++, and CodeWarrior. BBEdit provides a unified 
user interface for interacting with all supported environments, 
and lets the user easily switch between them. Metrowerks 


FEBRUARY 1995 @® MACTECHMAGAZINE 


added services in the new CW5 CodeWarrior release to support 
close integration. BBEdit 3.1 also supports the upcoming 
version 8.0 of Symantec C++ for Power Macintosh. 

The new version of BBEdit ships on CD-ROM, and includes 
full documentation for BBEdit in machine-readable form (a 
printed and bound manual is available at a nominal extra cost), 
demos of products from Bare Bones Software and other 
developers, promotional information and special offers from 
various third-parties, and a collection of BBEdit extensions 
contributed by BBEdit users from all over the world. 

SRP US$119. Customers who purchase BBEdit 3.0 (the 
current version) after December 1, 1994 will be eligible to 
receive a free upgrade to version 3.1. All other owners of 
BBEdit 3.0 will be able to upgrade to the new version for 
US$39. An upgrade path is also available for users of older 
versions of BBEdit (including freeware versions), and for 
selected competing and complementary products; contact Bare 


Bones Software for more information. 

Bare Bones Software, Inc. P.O. Box 108 Bedford, MA 01730 (508) 651-3561 voice, 
(508) 651-7584 fax. E-mail bbsw@netcom.com, AppleLink BARE.BONES, eWorld 
BareBones, CIS: 73051,3255. 





THE INTERNET CONFIGURATION SYSTEM 


Quinn “The Eskimo” announces the release of the Internet 
Config system, a development that makes Internet access by a 
Macintosh even easier. 

We all use many different programs to access the 
Internet and each of these programs has its own preference 
dialog, wherein you set things like your Email address, your 
FTP helper application and your preferred program to open 
“jpg” files. Keeping these preferences in sync in all your 
Internet applications is increasingly difficult. Worse yet, 
many simple applications do not even have a mechanism for 
setting these preferences and so you are stuck with the 
author’s default preferences. 

The Internet Configuration system is a solution to this 
problem. Internet Config is an application that allows you to 
set these preferences once. Internet Config stores these 
preferences in a shared database and any “IC-Aware” 
application will get its preferences from this database. 

Internet Config has broad-based support from a wide range 
of Macintosh Internet developers. A number of applications 
have already been programmed to be “IC-Aware” and many 
more are expected soon. 

Internet Config will run on all Macintosh Plus or newer 
machines running System 6 or later. Internet Config is available 
at the MacGifts, Info-Mac and UMich ftp sites (and their mirror 
sites), and also any site that holds Peter Lewis’ software (see 
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p. 66). Internet Config is available as a NewsWatcher helper at 
ftp://ftp.acns.nwu.edu/pub/newswatcher/helpers/ and on the TidBITS site 
ftp://ftp.tidbits.com/pub/tidbits/ 

Internet Config has been placed in the public domain and 
can be freely redistributed by any means. This means that 
you re legally entitled to: 

e sell it or its source code commercially 

e distribute it as part of any other product 

e distribute it on CD, disk, network or any other medium 

e do anything else you like with it 

From a programmer’s point of view, Internet Config is an 
application programmer interface (API) that lets you read and 
write shared preferences. This API calls through to the Internet 
Config component (if it is present) so that the actual 
implementation of the preference database code is dynamically 
linked in to your application. This means that as the Internet 
Config system gets smarter, your applications will become 
smarter, without the need for any work on your part (other 
than supporting Internet Config in the first place). 

The Internet Config Application automatically installs the 
Internet Config component when it is first run. If the Internet 
Config component is not available, then the API will use a 
statically linked version of the current database code, so IC- 
Aware programs do not rely on having the component available. 

Internet Config manages the following groups of 
preferences: Personal, Email, News, File Transfer, Other 
Services (e.g. Gopher and Ph), Fonts, File Types, and Helpers 
(for mapping URLs to their help applications). 

Full source code to the Internet Config system has been 
placed in the public domain. The system is essentially ‘open’, not 
a proprietary add-in which may become a liability in the future. 

You can get the Internet Config Programmer’s Kit 
from ftp://ftp.share.com/internet-configuration/ 
and ftp://redback.cs.uwa.edu.au//Others/Quinn/Config/ 

It has all the information you need to develop for Internet 
Config in Pascal or C using any of the common development 
environments (Metrowerks, Think and MPW). The kit also 
contains the source code to the Internet Config Extension. The 
same sites also have the Internet Config Application Source Kit, 
which contains the source code to the Internet Config 
application (in Think Pascal). 

About adding IC support to NewsWatcher, “I’m pleased, too. 
I figured this would be reasonably easy to support, and it 
turned out to be even easier. There were no major problems or 
stumbling blocks — just a bunch of really easy code, and it 
worked with no major hassles.” — John Norstad 





HIERARCHICAL OR RELATIONAL? — Wy Not Have Botu? 
iD de Magellan is a new external package for 4th 
Dimension. It allows 4D programmers to manage and present 
their relational data in a hierarchical manner. Whatever the 
structure of the data, iD de Magellan can create and maintain a 
hierarchical representation of it. Relational and hierarchical 
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database systems, the two most common types in today’s 
database market, are normally completely separate. iD de 
Magellan allows you to integrate the two representations. 

iD de Magellan adapts itself to any relational structure, 
generating a hierarchical representation of the data. Moreover, 
iD de Magellan can generate more than one hierarchical 
representation of the same relational structure. Once integrated 
into an external zone, iD de Magellan manages all data 
processing, navigation, formatting, importing, exporting, 
printing, etc., in an outliner-like interface. 


Logiciels Magellan (514) 344-1056 voice, (514) 344-2970 fax, AppleLink 
LOG.MAGELLAN, CompuServe 76506, 1656. 

Demo available ($10 CDN) by post to 919 Dunlop ave. Outremont, QC Canada H2V 
2W9, or on CompuServe/MACDEV/Library 6, file name: ID.SEA, or AppleLink/Third 
Parties/ACI/ACI Information/Third-Party Information. 





APPLE SUPPORT PROGRAMS UPDATE 


Apple Computer introduced the Newton Associates Program, 

and enhancements to the Newton Partners and Macintosh 

Partners programs. The Newton Associates Program is a low 

cost (US$400 annual fee), high quality, self-help development 

support program for Newton developers, and includes: 

¢ Support services from Apple’s Developer Support Center 

e Discounted rates for online technical information 

e Access to a technical Q&A reference library 

e Discounts on Newton and Macintosh hardware 

e A Newton Orientation Kit 

¢ A monthly Newton developer mailing, including the Newton 
Developer CD and Newton Technology Journal 

e Use of Apple’s third party compatibility lab 

¢ Discount on a Newton development class 

e Invitation to Newton and Worldwide Developer Conferences 

¢ Eligibility to participate in StarCore’s Affiliate Label Program 

The Newton Partners Program (formerly PIE Partners 
Program) price is now US$2500 annually, and includes all the 
features of the Newton Associates Program plus services such 
as expert-level programming support via e-mail, free updates to 
Newton development tools, and participation in select Apple 
marketing and PR opportunities. 

The Macintosh Partners Program has been enhanced with 
new features such as seeding on most Macintosh technologies, 
pre-release documentation for new CPU’s, one free Mac OS SDK 
subscription. Macintosh Associates may purchase the Mac OS 
SDK subscription at a substantial discount directly from APDA. 

The Apple Multimedia Program (AMP) no longer requires 
membership in the Associates Program. Members of the Apple 
Multimedia Program will continue to receive all the core 
services available through the Apple Developer Programs, as 
well as the benefits received through the Apple Multimedia 
Program. 

For more information on joining the Newton Associates Program or any of the Apple 


Developer Programs, please contact the Apple Developer Support Center at (408)974- 
4897, link DEVSUPPORT or e-mail devsupport@applelink.apple.com. 
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MAC PROFESSIONALS 


Manpower Technical, a leader 
in the Technical Services industry, 
has current and upcoming 
contract openings for experienced 
MAC personnel with the following 
expertise: Software Development, 
Network Administrators, Desk 
Top Publishing, Help Desk, 
Applications Support, Technical 
Writers/Editors. 

Positions are in California and 
throughout North America. 


Interested persons are encour- 


aged to send their resume to: 
Manpower Technical 
ATTN: Sandra Anderson 
P.O. Box 2053 
Milwaukee, WI 53201 


(800) 558-6992 
Fax # (414) 332-0378 
























Russ LaValle, 
MacApp 
Programmer at 
MacXperts, and 

B F-14 fighter pilot 


sert Storm 





Ricci a solid 
satis os piece of code” 


Wacky Fagranmers Wanted 


Macxperts has openings for 
experienced C++ and MacApp 
programmers. If you have what it 
takes, and the desire to achieve, call 
Kendall Tyler at MacXperts. 


Voie: 800-356-8040 Fax: 804-358-3847 
Internet: xperts@infi.net 
Applelink: xperts AOL: MacXperts 
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Get Your Name “In Lights” 


Have you ever thought about writing an article? The 
editorial staff at MacTech Magazine would like to personally 
invite you to write for the publication. While writing an 
article is not difficult, it does take a bit of time. But, you get 
to share your knowledge with the community, see your 
names “in lights”, and ... you get paid for your efforts! 

To get started, you can download the MacTech 
Writer’s Kit from one our online support areas. Here 
you will find information on how to submit an article — 
and it comes with examples, templates and style sheets. 
Feel free to e-mail us with questions. 


Call for Articles 


Many of you have asked “what topics would we 
like to see?” Recently, our Editor, Scott T Boyd, 
provided us with insight as to what he’d like the 
magazine to cover in 1995. Our goal at the magazine is 
to publish articles on diverse topics that are sure to 
keep our readers both interested and well-informed 
throughout the year. If you’d like to be part of this 
group, think about what you know about — that’s what 
we'll be most interested in. As a guideline, you can 
think about one of the following issues. 

For example, topics that include articles that teach 
debugging techniques and advocate good debugging tools. 
This continues a recent theme about making software more 
reliable. We will continue to talk about “cool” Apple 
technology such as Threads and Drag and Drop; or as Scott 
said, “software that takes us out of the Stone Age.” 

There will be tips on how to get your business on 
the Internet and how business models are shaping up. 
More heavy-hitting deep technology articles will be 
included, such as the recent September article on 
emulator technology and the two-part article on 
PowerPC Architecture. We'll see continued coverage on 
the developments in OpenDoc and OLE technologies, as 
those on the sidelines start choosing up sides or 
deciding not to play. 

MacTCP is another area of importance, as more 
people get excited about providing Macintosh-quality 
software for Internet users. You will see additional 
coverage on Visual Programming. You should also 
expect to see more on cross platform development. And, 
even though it’s a moving target, we will be covering 
Apple’s next System Software release — Copland. 


E-mail us with your idea and let’s talk. You never 
know, you might get your name “in lights”! 
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If you have a CD-ROM drive, 
then you've gotta have every article 


published in the first 9 years of 
MacTech Magazine!! 


... NOW in THINK Reference format! 





MacTech CD -ROM 
Volumes 1-9: 





Every article, 1100+ of them, from all 103 issues of MacTech Magazine printed 
from 1984 through 1993. Articles ranging from Assembly to BASIC, C to Pascal, 
Forth to FORTRAN and more. And the articles are in THINK Reference! 


/ 


The articles have hyperlinks to relevant portions of the Inside Macintosh 
databases of THINK Reference. For example, if you are looking for 
information on Aliases, look at the MacTech articles on Aliases and use the 
hyperlinks to jump to the Znside Macintosh entry for the Alias Manager. And 
now, with the articles in THINK Reference, you can do free-text searches 8-10 
times faster than you could previously with On Location™ 2.0. 
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These are the files that go with the magazine — the code that the articles are 
talking about. Use them in your own applications, with no royalties! 


Including Inside Macintosh Volumes 1-6 (7 MB). 





Build your simple application using a lean, mean application framework. 
Experiment with new code without having to build a whole application 


“When I designed THINK Reference, I envisioned endless | 
around it! 


databases at my fingertips. MacTech has doubled the 
information that is just a mouse click away.” J 
— Darrell LeBlanc, Formerly of Symantec, 
Author, THINK Reference 2.0 The most complete set of FrameWorks 


archives known. 


“The CD strikes me as an impressive and very useful resource. Symantec’s THINK Reference 


The only disadvantage I’ve found is that each answer the 
databases yield exposes me to so many more issues, that I 
tind myself exploring the articles for the sheer wonder of it, 
and thus putting off the real coding I should be doing. :-)” 
— Nicholas De Mello 
MacTech CD Beta Tester 
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Including: Universal Header Files, Discipline, 
Macintosh Drag and Drop SDK, MacsBug, 
Telephone Manager SDK, Thread Manager 
SDK, TrueEdit 1.8 and and more. 


...and other related BASIC programming 
information and tools. 


MacTech CD-ROM, Volumes 1-9: 


2.0. Complete on-line guide 
to Inside Macintosh, Vol. I-VI, 
with cross referenced index, 
detailed information of each 
function, procedure and 
detail needed when 
programming the Macintosh. 


AVANNNESGN | 


$199 plus shipping and handling. $69 plus shipping and handling for 


upgrades from any previous version of the CD 


All purchasers of the 1-9 CD will receive a FREE upgrade to the next 


version of the CD when in becomes available. 
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MACTECH EXCLUSIVES 


MacTech Magazine is your 


exclusive source for these 
specific products: 
NEW! Ad Lib 2.0 The premier 
MacApp 3.0 compatible 
ViewEdit replacement. A powerful user- 
interface editing tool to build views for 
MacApp 3.0 and 3.1. Ad Lib allows 
ubdclassing of all of MacApp's view 
classes including adorners, behaviors, 
and drawing environments. String and 
text style resources are managed 
automatically. Alternate display methods, 
such as a view hierarchy window, allow 
easy examination of complex view 
structures. Ad Lib includes source code 
for MacApp extensions that are supported 
by the editor — buttons can be activated 
oy keystrokes, behaviors can be attached 
to the application object, and general 
purpose behaviors can be configured to 
perform a number of useful functions. 
Run mode allows the user to try out the 
views as they will work in an application. 
Templates can be created to add 
additional data fields to view classes. 
Editing palettes provide fast and easy 
editing of common objects and attributes. 
Works with ACI's Object Master (version 
2.0 and later) to navigate a project's user 
interface source code. $195 


FrameWorks Magazine: 
$8/issue, subject to availability. 


FrameWorks Source 
Code Disk: $10/issue, 
Subject to availability. 


NEW! Five Years of Objects 
CD-ROM: = FrameWorks 


archives and source code from April 1991 
to January 1993, plus selected object- 
oriented publicly available software and 
demos. $95 


MADACON '93 CD-ROM: The 
highlights of MADACON '93, including 
Mike Potel on Pink, Bedrock, MacApp, 
OODLs, and more. Slides, articles, 
demos, audio, and QuickTime. $95 


NEW! MAScript 1.2 adds support 
for AppleScript to your 


MacApp 3.0.1 and 3.1 based applications. 
Make your application scriptable and 
recordable by building on a tried and 
tested framework for object model 
support. MAScript dispatches Apple 
events to the appropriate objects, creates 
object specifiers, and makes framework 
objects like windows and documents 
scriptable and recordable. Sample 


(7) 





application shows you how to begin 
adding support for scripting and 
recording. MAScript includes complete 
source code. Install MAScript by 
modifying one MacApp source file, then 
adding another to your project. Future 
versions of MacApp will incorporate 
MAScript, so MAScript support you add 
now will work in the future. $199 


NEW! The Mjginer BETA 
System is a software 
development environment supporting 
object-oriented programming in the BETA 
programming language. BETA is uniquely 
expressive and orthogonal. BETA unifies 
just about every abstraction mechanism - 
including class, procedure, function, 
coroutine, process and exception - into 
the ultimate abstraction mechanism: the 
pattern. BETA includes: general block 
Structure, strong typing, whole/part 
Objects. The compiler: binary code 
generation, automatic garbage collection, 
Separate compilation, interface to C, 
Pascal, and assembler. 


The system: persistent objects, basic 
libraries with containers classes, 
platform-independent GUI application 
frameworks on Unix, Mac and Windows 
NT, metaprogramming system. The tools 
available on Unix: the hyper structure 
editor supporting syntax directed editing, 
browsing, etc., and the source code 
debugger are currently being ported to the 
Macintosh system. The Mjglner BETA 
System for Macintosh requires MPW 
(basic set) 3.2 or later. 


Package containing compiler, basic 
libraries, persistent store, GUI framework, 
and comprehensive documentation. 
(Other packages are also available) $295 


OSA support 
includes attachability, recordability, 
scriptability, coercion, in addition to 
script execution, idling and i/o. Apple 
event support includes complex object 
specifiers, synchronous/asynchronous 
Apple event handling, and Apple event 
transactions for clients and servers. The 
Core Suite of Apple event objects is 
Supporting including the application, 
documents, windows, and files. 
Documentation includes technology 
overview, cookbook, and sample code. 
$250 Savvy now supports MPW 3.1, 
3.11 and continues to support 3.01, as 
well as supporting Metrowerks Code 
Warrior. This month only, special 
offer - All Savvy versions include free 
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copy of Savvy QuickTime! 


More Savvy includes all 

Savvy features plus Apple event support for all 
sub-classes of TEventHandler with extensive view 
support. Apple event support for text includes text 
attributes and sub-range specification. Recordability 
supports additional actions, and coercion includes 
additional types. Additional client and server Apple 
events. $450 


NEW! Super Savvy includes all More Savvy features 
plus compile, edit, and record scripts using built 


in script editor. View template editors, like Ad Lib, can 
attach scripts to view objects and modified scripts are saved 
with the document. Script action behavior allow quick 
access for executing and editing scripts attached to views. 
Text to object specifier coercion plus more. $700 


NEW! Savvy QuickTime Requires Savvy, More 
savvy, or Super Savvy. Includes QuickTime, 
Apple event and view template support. Movies come out 
of the box ready to play, edit, and react to Apple events. 
They can be included in any view structure, including 
templates, and are displayed in the scrap view. Movie 
controls include volume, play rate, looping mode, display 
style, and other characteristics. $250 


NEW! Savvy DataBase Requires Savvy, More 
Savvy, or Super Savvy. Available Winter 
1994. $250 


MacTech Magazine is your exclusive source for 
available back issues of SFA's magazine, source 
code disks and assorted CD's. Call for more info 
and pricing. 


BOOKS 


Defying Gravity: The Making of Newton 
Doug Menuez and Markos Kounalakis. An in depth, 
dramatic account of the story of Newton’s creation. It 
is a techno-logical adventure story; a fascinating case 
Study of the process by which an idea is born and then 
translated into a product on which careers and fortunes 
can be made or lost. It is a new kind of business book, 
one that captures through powerful photo-journalism 
and a fast-paced text, the human drama and risk 
involved in the invention of a new technology for a new 
marketplace. 196 pgs., $20-05 $26.95 


The Elements of E-Mail Style by Brent Heslop 
and David Angell. Learn the rules of the road in the e- 
mail age. Concise, easy-to-use format explaining 
essential e-mail guidelines and rules. It covers style, 
tone, typography, formatting, politics and etiquette. It 
also outlines basic rules of composition within the special 
context of writing e-mail and includes samples and 
templates for writing specific types of e-mail 
Correspondence. 208 pages. $44.95 $13.45 


NEW! E-Mail Essentials by Ed Tittel & Margaret 
Robbins is a hands-on guide to the basics of e-mail, 
the ubiquitous networks communication system. The book is 
Suitable for both the casual e-mailer and the networking 
professional, as it covers everything from the installation of e- 
mail to the maintenance and management of e-mail hubs and 
message servers. The books explains the fundamental concepts 
and technologies of electronic mail, featuring chapters on Lotus 
applications and CompuServe, as well as information on 
upgrading, automation, message-based applications, and user 
training. E-mail is a step-by-step, jargon-free guide that will 
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enable the e-mail user to get the most out of the communication 
potentials of networking. 250 pp. $2405 $22.45 


Graphics Gems IV edited by Paul 

Heckbert Volume IV is the newest collection of 
carefully crafted, innovative gems. All of the gems are 
immediately accessible and useful in formulating clean, 
fast, and elegant programs. The C programming 
language is used for most of the program listings, 
although several of the gems have C++ implementations. 
An IBM or Macintosh disk containing all of the code from 
all four volumes is included. Includes one 3.5" high- 
density disk. $40-05 $44.95 


How To Write Macintosh Software by Scott 
Knaster is a great source for understanding Macintosh 
programming techniques. Drawing from his years of 
experience working with programmers, Scott explains the 
mysteries and myths of Macintosh programming with wit 
and humor. The third edition, fully revised and updated, 
covers System 7 and 32-bit developments, and explores 
such topics as how and where things are stored in 
memory; what things in memory can be moved around 
and when they may be moved; how to debug your 
applications with MacsBug; how to examine your 
program's code to learn precisely what's going on when it 
runs. 448 pgs., $28-06 $26.05 


The Instant Internet Guide by Brent Heslop and 
David Angell. An Internet jump-start — how to access, use 
and navigate global networks. The Instant Internet Guide 
equips readers with the tools needed to travel the electronic 
world. The book highlights the most important sources of 
Internet news and information and explains how to access 
information on remote systems. It outlines how to use 
essential Internet utilities and programs and includes a 
primer on UNIX for the Internet. 224 pages 44.05 $13.45 


Learn C on the Macintosh by Dave Mark. This self- 
teaching book/disk package gives you everything you need 
to begin programming on the Macintosh. Learn to write, 
edit, compile, and run your first C programs through a series 
of over 25 projects that build on one another. The book 
comes with THIN C — a customized version of Symantec’s 
THINK C, the leading programming environment for 
Macintosh. 464 pages, Book/disk: $84.05 $31.45 


Learn C++ on the Macintosh by Dave Mark. After 
a brief refresher course in C, Learn C++ introduces the 
basic syntax of C++ and object programming. Then you'll 
learn how to write, edit, and compile your first C++ 
programs through a series of programming projects that 
build on one another as new concepts are introduced. Key 
C++ concepts such as derived classes, operator 
Overloading, and iostream functions are all covered in 
Dave's easy-to-follow approach. Includes a special version 
of Symantec C++ for Macintosh. Book/disk package with 
3.5° 800K Macintosh disk. 400 pages, $36-05 $33.26 


Macintosh C Programming Primer Volume I, 
Second Edition, Inside the Toolbox Using 
THINK C by Dave Mark and Cartwright Reed. This new 
edition of this Macintosh programming bestseller is 
updated to include recent changes in Macintosh 
technology, including System 7, new versions of THINK C 
and ResEdit, and new Macintosh machines. Readers will 
learn how to use the resources, Macintosh Toolbox and 
interface to create stand-alone applications. 672 pages, 
$2605 $24.25 


Macintosh C Programming Primer Volume 
ll, Mastering the Toolbox Using THINK C by 
Dave Mark. Volume II picks up where Volume | leaves off, 
covering more advanced topics such as: Color 


QuickDraw, THINK Class Library, TextEdit, and the 
Memory Manager: 528 pgs. $26-06 $24.25 


Macintosh Pascal Programming Primer 
Volume I, Inside the Toolbox Using THINK 
Pascal by Dave Mark and Cartwright Reed. This 
tutorial shows programmers new to the Macintosh how to 
use the Toolbox, resources, and the Macintosh interface 
to create stand-alone applications with Symantec's THINK 
Pascal. 544 pages $26-05 $24.25 


Macintosh Programming Techniques by Dan 
Sydow (Series Editor: Tony Meadow). This tutorial and 
handbook provides a thorough foundation in the special 
techniques of Macintosh program-ming for experienced 
Macintosh programmers as well as those making the 
transition from DOS, Windows, VAX or UNIX. Emphasizes 
Programming techniques over syntax for better code, 
regardless of language. Guides the reader through 
Macintosh memory management, QuickDraw, events and 
more, using sample program in C++. Disk includes an 
interactive tutorial, plus reusable C++ code. $34-05 $31.95 


NEW! Multimedia Authoring Building and 
Developing Documents by Scott Fisher 
addresses the concerns that face anyone trying to create 
multimedia documents. It offers specific advice on when 
to use different kinds of information architecture, 
discusses the human-factors concepts that determine how 
readers use and retain information, and them applies these 
findings to multimedia documents, covering the high-level 
issues concerning planners and authors of multimedia 
documents as well as those involved in evaluating or 
purchasing multimedia platforms. Includes one 3.5" high- 
density disk. $8495 $31.45 


NEW! Programming for the Newton 
Software Development with 


NewtonScript by Julie McKeehan and Neil Rhodes. 
Foreword by Walter R. Smith. Programming for the Newton: 
Software Development with NewtonScript is an 
indispensable tool for Newton programmers. Readers will 
learn how to develop software for the Newton on the 
Macintosh from people that developed the course on 
programming the Newton for Apple Computer. The enclosed 
3.5° disk contains a sample Newton application from the 
books, as well as demonstration version of Newton Toolkit 
(NTK), Apple Computers complete development environment 
for the Newtons. A Publication of AP Professional May 
1994, Paperback, 393 pp. $29-95 $26.95 


Programming in Symantec C++ for the 
Macintosh by Judy May and John Whittle. This book 
will introduce you to object-oriented programming, the 
C++ language, and of course Symantec C++ for the 
Macintosh. You don’t have to be a programmer, or even 
know anything about programming to benefit from this 
book. Programming in Symantec C++ for the Macintosh 
covers everything from the basics to advanced features of 
symantec C++. If you are a Think C or Zortech C++ 
programmer who wants to learn more about object- 
Oriented programming or what's different about Symantec 
C++, there are whole chapters specifically for you. 
Includes helpful examples of C++ code that illustrate 
Object-oriented programs. $29-95 $26.95 


Programming for System 7 by Gary Little and Tim 
Swihart, is a hands-on guide to creating applications for 
system 7. It describes the new features and functions of 
the operating system in detail. Topics covered include file 
operations, cooperative multitasking, Balloon Help, Apple 
events, and the File Manager. Numerous working C code 
examples show programmers how to take advantage of 
each of these features and use them in developing their 
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applications. 384 pages $26-96 $24.25 


ResEdit™ Complete, Second Edition by Peter 
Alley and Carolyn Strange. With ResEdit, Macintosh 
programmers can customize every aspect of their interface 
form creating screen backgrounds and icons to 
customizing menus and dialog boxes. 608 pages. 
Book/disk package. $3495 $31.45 


Sad Macs, Bombs, Disasters and What to 
Do About Them by Ted Landau comes to the rescue 
with your Macintosh problems. From fractious fonts to 
the ominous Sad Macintosh icon, this emergency 
handbook covers the whole range of Macintosh problems: 
symptoms, causes, and what you can do to solve them. 
640 Pages $2495 $22.45 


Software By Design: Creating User Friendly 
Software by Penny Bauersfeld (Series Editor: Tony 
Meadow). This excellent reference provides readers with a 
thorough how-to for designing software that is easy to 
learn, comfortable to operate and that inspires user 
confidence. Written from the perspective of Macintosh, 
but compatible with all platforms. Stresses user input 
from initial design, through prototyping, testing and 
revision. Provides tools for analyzing user needs and test 
responses. Includes exercises for sharpening user- 
oriented design skills. $20-95 $26.95 


NEW! Taligent's Guide to Designing 
Programs Well-Mannered Object- 


Oriented Design in C++ is the Taligent approach to 
object-oriented design. The Taligent Operating 
Environment is the first commercial software system 
based entirely on object-oriented technology. Taligent's 
Guide to Designing Programs is a developer's-eye view of 
this system. It introduces new concepts of programming 
and empowers developers to create software more 
productively. Out of their direct experience in developing 
the system, the authors focus on global issues of object- 
oriented design and writing C++ programs, and the 
specific issues of programming in the Taligent Operating 
Environment. Taligent's Guide to Designing Programs 
assumes the reader is an experienced C++ programmer, 
and proceeds from there to fully explore ‘the Taligent way’ 
of programming. $49-60 $17.55 


Writing Localizable Software for the 
Macintosh by Daniel R. Carter. 469 pages. $26-95 
$24.25 


THE APPLE LIBRARY 


HyperCard Stack Design Guidelines by Apple 
Computer, Inc. is an essential book for everyone who 
creates Apple HyperCard stacks, from beginners to 
commercial developers. It covers the basic principles of 
design that, when incorporated, make HyperCard stacks 
effective and usable. Topics include guidelines, 
navigation, graphic design and screen illustration, text in 
stacks, music and sound, a sample stack development 
scenario, collaborative development, and the Stack 
Design Checklist. 240 pages, $4-95 $19.95 


Inside AppleTalk by Gursharan S. Sidhu, Richard F. 
Andrews and Alan B. Oppenheimer. Apple Computer, Inc. 
650 pages, $3405 $31.45 


Inside Macintosh: AOCE Application 
Interfaces by Apple Computer, Inc. shows how your 
application can take advantage of the system software 
features provided by PowerTalk system software and the 
PowerShare collaboration servers. Nearly every Macintosh 
application program can benefit from the addition of some 
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of these features. This book shows how you can add 
electronic mail capabilities to your application, write a 
messaging application or agent, store information in and 
retrieve information from PowerShare and other AOCE 
catalogs, add catalog-browsing and find-in-catalog 
capabilities to your application, write templates that extend 
the Finder's ability to display information in PowerShare 
and other AOCE catalogs, add digital signatures to files or 
to any portion of a document, and establish an 
authenticated messaging connection. $4045 $36.40 


Inside Macintosh: AOQCE Service Access 
Modules by Apple Computer, inc. describes how to write 
a Software module that gives users and PowerTalk-enabled 
applications access to a new or existing mail and 
messaging service or catalog service. This book shows 
how to write a catalog service access module (CSAM), a 
messaging service access module (MSAM), and AOCE 
templates that allow a user to set up a CSAM or MSAM and 
add addresses to mail and messages. $26-05 $24.25 


Inside Macintosh: CD-ROM by Apple 

Computer, Inc. Inside Macintosh® is the 
essential reference for programmers, designers, and 
engineers for creating applications for the Macintosh family 
of computers. Inside Macintosh CD-ROM collects more 
than 25 volumes in electronic form, including: QuickDraw™ 
GX Library, Macintosh Human Interface Guidelines, 
PowerPC System Software, Macintosh Toolbox Essentials 
and More Macintosh Toolbox, QuickTime and QuickTime 
Components. Now programmers will be able to access over 
16,000 pages of the information they need directly from their 
computers. Hypertext linking and extensive cross 
referencing across volumes allows programmers to search 
and explore this library in ways that are unique to the 
electronic medium. Every Macintosh programmer will regard 
Inside Macintosh CD-ROM as their most important resource. 
$99.95 


Inside Macintosh: Devices by Apple Computer, 
Inc. describes how to write software that interacts with 
built-in and peripheral hardware devices. With this book,. 
you'll learn how to write and install your own device 
drivers, desk accessories, and Chooser extensions; 
communicate with device drivers using the Device 
Manager; access expansion cards using the Slot Manager: 


control SCSI devices using SCSI Manager 4.3 or the 


original SCSI Manager; communicate directly with Apple 
Desktop Bus devices; interact with the Power Manager in 
battery-powered Macintosh computers; and communicate 
with serial devices using the Serial Driver. $29-05 $26.95 


Inside Macintosh: Files by Apple Computer, Inc. 
describes the parts of the operating system that allow you to 
manage files. It shows how your application can handle the 
commands typically found in a File menu. It also provides a 
reference to the File and Alias Managers, the Disk Initialization 
and Standard File Packages. 510 pgs, $29-05 $26.95 


Inside Macintosh: Interapplication Com- 
munication by Apple Computer, Inc. shows how 
applications can work together. How your application can 
share data, request information or services, allow the user 
to automate tasks, communicate with remote databases. 
$34.05 $31.45 


Inside Macintosh: Imaging by Apple Computer, 
Inc. covers QuickDraw and Color QuickDraw. The book 
includes general discussions of drawing and working with 
color. It describes the structures that hold images and 
image information, and the routines that manipulate them. 
It also covers the Palette, Color, and Printing Managers, 
and the Color Picker, Color Matching, and Picture 
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Utilities. $26-05 $24.25 


Inside Macintosh: Macintosh Toolbox 
Essentials by Apple Computer, Inc. covers the heart of 
the Macintosh. The toolbox enables programmers to 
create applications consistent with the Macintosh “look 
and feel”. This book describes Toolbox routines and 
shows how to implement essential user interface 
elements, Such as menus, windows, scroll bars, icons and 
dialog boxes. 880 pages $34.05 $31.45 


Inside Macintosh: More Macintosh Toolbox 
by Apple Computer, Inc. covers other Macintosh features 
such as how to support copy and paste, provide Balloon 
Help, play and record sound and create control panels are 
covered in this volume. The managers discussed include 
Help, List, Resource, Scrap and Sound. $8466 $31.45 


Inside Macintosh: Memory by Apple Computer, 
Inc. describes the parts of the Macintosh operating 
system that allow you to manage memory. It provides 
detailed strategies for allocating and releasing memory, 
avoiding low-memory situations, reference to the Memory 
Manager, the Virtual Memory Manager, and memory- 
related utilities. 296 pages, $2495 $22.45 


Inside Macintosh: Networking by Apple 
Computer, Inc. describes how to write software that uses 
AppleTalk networking protocols. It describes the 
components and organization of AppleTalk and how to 
select an Applelalk protocol. It provides the complete 
application interfaces to all AppleTalk protocols, including 
ATP (AppleTalk Transaction Protocol), DDP (Datagram 
Delivery Protocol), and ADSP (AppleTalk Data Stream 
Protocol), among others. $20-05 $26.95 


Inside Macintosh: Operating System Utilities 
by Apple Computer, Inc. describes parts of the Macintosh 
Operating System that allow you to manage various low- 
level aspects of the operating system. Everyone who 
programs the Macintosh should read this book! It will show 
you in detail how to get information about the operating 
system, manage operating system queues, handle dates and 
times, control the settings of the parameter RAM, 
manipulate the trap dispatch table, and receive and respond 
to low-level system errors. $26-05 $23.45 


Inside Macintosh: Overview by Apple Computer, 
Inc. is the first book that people who are unfamiliar with 
Macintosh programming should read. It gives an 
overview of Macintosh programming fundamentals and a 
road map to the New Inside Macintosh library. Inside 
Macintosh: Overview also covers various programming 
tools and languages, compatibility guidelines and an 
overview of considerations for worldwide development. 
176 pages, $2295 $20.65 


Inside Macintosh: PowerPC Numerics by Apple 
Computer, Inc. describes the floating-point numerics 
environment provided with the first release of PowerPC 
processor-based Macintosh computers. The numerics 
environment conforms to the IEEE standard 754 for binary 
floating-point arithmetic. This book provides a description 
of that standard and shows how RISC Numerics compiles 
with it. This book also shows programmers how to create 
floating-point values and how to perform operations on 
floating-point values in high-level languages such as C and 
in PowerPC assembly language. $28-95 $26.00 


Inside Macintosh: PowerPC System 
Software by Apple Computer, Inc. describes the new 
process execution environment and system software 
services provided with the first version of the system 
software for Macintosh on PowerPC computers. It 
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contains information you need to know to write 
applications and other software that can run on the 
PowerPC. PowerPC System Software shows in detail how 
to make your software compatible with the new run-time 
environment provided on PowerPC-based Macintosh 
computers. It also provides a complete technical reference 
for the Mixed Mode Manager, the Code Fragment 
Manager, and the Exception Manager. $24.05 $22.45 


Inside Macintosh: Processes by Apple 
Computer, Inc. describes the parts of the Macintosh 
operating system that allow you to control the execution 
of processes and interrupt tasks. It shows in detail how 
you can use the Process Manager to get information 
about processes loaded in memory. It is also a reference 
for the Vertical Retrace, Time, Notification, Deferred Task, 
and Shutdown Managers. 208 pages, $2495 $20.65 


Inside Macintosh: QuickTime by Apple 
Computer, Inc. is for anyone who wants to create 
applications that use QuickTime, the system software that 
allows the integration of video, animation, and sounds 
into applications. This book describes all of the 
QuickTime Toolbox utilities. In addition, it provides the 
information you need to compress and decompress 
images and image sequences. $20-05 $26.95 


Inside Macintosh: QuickTime Components 
by Apple Computer, Inc.covers how to use and develop 
QuickTime components such as image compressors, 
movie controllers, sequence grabbers, and video 
digitizers. $84.95 $31.45 


Inside Macintosh: Sound by Apple Computer, Inc. 
describes the parts of the Macintosh system software that 
allow you to manage sounds. It contains information that 
you need to know to write applications and other software 
that can record and play back sounds, compress and 
expand audio data, convert text to speech, and perform 
other similar operations. $26-95 $24.25 


Inside Macintosh: Text by Apple Computer, Inc. 
describes how to perform text handling, from simple 
character display to multi-language processing. The 
Font, Script, Text Services, and Dictionary Managers are 
all covered, in addition to QuickDraw Text, TextEdit, and 
International and Keyboard Resources. $39-05 $35.95 


Inside Macintosh: QuickDraw™ GX Library by 
Apple Computer, Inc. is the powerful new graphics 
architecture for the Macintosh. Far more than just a 
revision of QuickDraw, QuickDraw Gx is a unified approach 
to graphics and typography that gives programmers 
unprecedented flexibility and power in drawing and printing 
all kinds of shapes, images, and text. This long-awaited 
extension to Macintosh system software is documented in a 
library of books that are themselves an extension to the new 
Inside Macintosh series. The QuickDraw GX Library is 
Clear, concise, and organized by topic. The books contain 
detailed explanations and abundant programming 
examples. With extensive cross-references, illustrations, 
and C-language sample code, the QuickDraw GX Library 
gives programmers fast and complete reference information 
for creating powerful graphics and publishing applications 
with sophisticated printing capabilities. The first two 
volumes in the QuickDraw GX Library are: 


Inside Macintosh: QuickDraw GX Objects by 
Apple Computer, Inc. introduces QuickDraw GX and its 
Object structure, and shows programmers how to manipulate 
objects in all types of programs. $26-95 $24.25 


Inside Macintosh: QuickDraw GX Graphics by 
Apple Computer, Inc. shows readers how to create and 
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manipulate the fundamental geometric shapes of QuickDraw 
GX to generate a vast range of graphic entities. It also 
demonstrates how to work with bitmaps and pictures, and 
specialized QuickDraw GX graphic shapes. $26-95 $24.25 


Inside Macintosh: X-Ref. by Apple 
Computer, Inc. is an index for Inside Mac. 


$4205 $11.65 


LANGUAGES 


CodeWarrior™ CD by Metrowerks 
comes intwo versions — Bronze and 
Gold. These CDs contain the 
CodeWarrior development environment 
including C++, C and Pascal compilers: 

LU .C*nigh'-Speed linkers; native-mode 
MICS interactive debuggers: and a powerful 
new application framework called PowerPlant for rapid 
Macintosh development in C++. Bronze generates 680x0 
code. Gold generates both 680x0 and PowerPC code. All 
versions are a 3 CD subscription over a 1-year period. 
Bronze: $99, Gold: $399. Bronze comes with a 6- 
month MacTech subscription. Gold comes with a 
1-year subscription. Both at no additional charge! 


NEW! Geekware by 
Metrowerks is here! 
In high school, they called 
you a computer geek. Now, 
they work at burger joints and 


wear polyester uniforms. And you don’t. Wear it to your 
favorite burger joint. $24.95 











FORTRAN by Language Systems is a full-featured ANSI 
Standard FORTRAN 77 compiler that runs in the 
Macintosh Programmers Workshop (MPW). All major 
VAX extensions are supported as well as all major 
features of Cray and Data General FORTRAN. FORTRAN 
creates System 7 savvy applications quickly and easily. 
Compiler options specify code generation and 
optimization for all Macintoshes, including special 
optimizations for 68040 machines. Error messages are 
written in plain English and are automatically linked to the 
source file. The runtime user interface of compiled 
FORTRAN programs is fully customizable by 
programmers with any level of Macintosh experience. 
$595. w/o MPW: $495. Corporate 5 pack $1575 


FORTRAN 77 SDK for Power Macintosh by Absoft 
includes a globally optimizing native compiler and linker, 
native Fx™ multi-language debugger, and Apple’s MPW 
development environment. The compiler is a full ANSI/ISO 
FORTRAN 77 implementation and includes all MIL-STD 1753 
extensions, Cray/Sun-style POINTER, and several Fortran 90 
enhancements. MRWE, Absoft’s application framework 
libraries, is included as is the MIG graphics library for quick 
Creation of plots and graphs. The native Macintosh PPC 


toolbox is fully supported. Absoft’s Fx debugger can debug 
intermixed FORTRAN 77,C, C++, PPC assembler. The 
compiler, linker, and debugger all run as native PPC tools and 
produce native Macintosh PPC executables. $699 


MacFortran® II V3.3 is a VAX/VMS compatible, 
full ANSI/ISO FORTRAN 77 compiler including all MIL- 
STD 1753 extensions. Acknowledged to be the fastest 
FORTRAN available for Macintosh, MacFortran II is 
bundled with the latest version of Macintosh 
Programmer's Workshop (MPW), and includes 
SourceBug (Apple's source level symbolic debugger) and 
SoftwareFPU (a math co-processor emulator). Also 
included is Absoft’s Macintosh Runtime Window 
Environment (MRWE) application framework (with fully 
documented source code as examples) and MIG graphics 
library. MacFortran Il v3.3 features improved 68040CPU 
Support and is fully compatible with Power Macintosh 
under emulation. Documentation includes special 
sections devoted to use of MacFortran II with the MPW 
editor and linker, implementation of System 7 features, 
and porting code to the Macintosh from from various 
mainframes and Unix workstation platforms. $595 


ene BASIC for the Newton is 
BASIC for the Newton! From NS BASIC 
ees Corporation, it is a fully interactive 
ga implementation of the BASIC programming 
NS BASIC language. It runs entirely on the Newton - 
no host is required. It includes a full set of functions and 
data types, hand-written input, windows, buttons and 
extensions to take advantage of the Newton environment. 
Applications can create files or access the built-in soups. 
Applications can also access the serial port for input and 
output. Work directly on the Newton, or through a 
connected Mac/PC and keyboard. NS BASIC includes a 
150 page pocket sized manual. $99 


SmallitalkAgents™ 2 
superset of the Smalltalk 
language, is fully integrated 
with Macintosh, incor- 
porating design features 
Specifically for the RISC and Macintosh System 7 
architecture. SmalltalkAgents is a true object oriented 
workbench that includes an incremental and extensible 
compiler, an array of design and cross reference tools. 
pre-emptive interrupt driven threads and events, an 
extensive class library including classes for general 
programming, classes for the Macintosh user interface and 
Classes for the Macintosh operating system. Integration of 
components in enterprise systems is simplified with the 
network, telecommunication, and inter-application 
communication libraries. The SmalltalkAgents’ extensive 
Class library and add-on components make it especially 
well suited as a development workbench for custom 
applications in business, education, science, engineering, 
and academic research. $695 


VINNGESON | 


Symantec C++ for Macintosh is an object 
oriented development environment designed for 
professional Macintosh programmers. Symantec C++ 
features powerful object-oriented development tools 
within a completely integrated environment. The C++ 
compiler, incremental linker, THINK Class Library, 
integrated browser, and automatic project management 
give Symantec C++ fast turnaround times. This product 
supports multiple editors and translators, so you can use 
your favorite tools and resource editors as well as scripts 
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youve written within the environment. And with ToolServer, 
youll be able to customize menus and attach scripts based 
on Apple events, AppleScript, and MPW Tools. The built-in 
sourceserver provides a source code control system, 
allowing teams of programmers to solve tough problems 
faster. With SourceServer, you'll always know you're 
working on the latest version. And you'll have old versions 
at your fingertips when code “breaks” and you need to look 
back at modifications. Product Contents: Three high 
density disks, an 832-page user manual, a 568-page THINK 
Class Library and a 100-page C++ Compiler Guide. $369 


THINK © by Symantec Corporation. THINK C is easy to use 
and highly visual, making it the No. 1 selling Macintosh 
programming environment. Enhancements make this product 
faster and more versatile than ever, improving your 
productivity with more powerful project management, a full set 
of tools, and script support for major script-based languages. 
With the THINK environment, you spend less time on routine 
programming tasks due to an extremely fast compiler and 
incremental linker. In addition, the automatic project manager 
Saves you time by tracking changes to your files and 
recompiling only those that have changes. All the tools you 
need — a multi-window editor, compiler, linker, debugger, 
browser, and resource editor — are completely integrated for 
speed and ease of use. One of the most valuable of these tools 
is the THINK Class Library, a set of program building blocks 
that gives you a head start in writing object-oriented 
applications. And with the new open architecture, you can use 
your favorite tools, resource editors, and scripts within the 
environment. THINK C is the logical next step for 
programmers who have worked in HyperCard or other script- 
based development environments. The environment supports 
AppleScript, Apple events, and Frontier, so you can link and 
automate complex, multi-project operations. Product 
Contents: Four Macintosh disks, an 832-page user manual, 
and a 568-page THINK Class Library Guide. $219 


THINK Pascal v. 4.0 by Symantec Corporation. 
Professionals and students will welcome this version of 
THINK Pascal. It is fully integrated for rapid turnaround 
time and lets you take advantage of System 7 capabilities. 
Features include support for large projects, enhanced 
THINK Class Library, System 7 compatibility, superior 
code generation, and smart linking. Product Contents: 
Four Macintosh disks, a 562-page user manual, and a 
498-page object-oriented programming manual. $169 


UTILITIES 


BBEdit 3.1 from Bare Bones Software is now 

better than ever. In addition to being Accelerated 
for Power Macintosh, this powerful, intuitive text editor 
offers integrated support for THINK C 7.0, Metrowerks 
CodeWarrior, THINK Reference 2.0 and MPW ToolServer. 
Version 3.1 adds even more capability, including “soft 
wrapping of text on screen and numerous refinements and 
improvements to the user interface. BBEdit's many features 
include: Integrated PopupFuncs(TM) technology for speedy 
navigation of source code files (C, C++, Pascal, Rez, 68K 
Assembler, and Fortran), unique ‘Find Differences: 
command (BBEdit can find differences between projects 
and folders as well as files), Support for Macintosh Drag 
and Drop for editing and other common tasks, PowerTalk 
support for reading, sending and composition of PowerTalk 
mail, scripting via any OSA compatible scripting language 
including AppleScript and Frontier 3.0, and fast search and 
replace with optional "grep" matching and multi-file 
Searching. BBEdit's robust feature set and proven 
performance and reliability make it the editor of choice for 
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professionals and hobbyists alike. $119 


C Programmer’s Toolbox/MPW Rev. 3.0 by 
MMCAD. The C Programmer's Toolbox provides a wealth 
of programming and documentation support tools for 
developers who are creating new code, porting existing 
code, or trying to improve and expand existing code. The 
tools include: CDecl composes and translates C/C++ 
declaration statements to/from English; CFlow™ 
determines program function hierarchy, runtime library 
contents, function/file interdependencies and graphs all or 
part of a program’s functional! structure; CHilite™ 
highlights and prints C/C++ files; CLint™ semantically 
checks multiple C source files, identifying potential 
programming bugs; CPrint™ reformats, beautifies and 
documents C/C++ source files: and more... Works with 
MPW C/C++, THINK C, requires Apple's MPW. $295 


CLimate by Orchard Software is a command line 
interface that lets you communicate with your Macintosh 
using English commands to create, delete, rename, and 
move files and folders. It can start applications, format 
disks, restart your computer, etc. CLimate supplements 
the Finder. It includes a BASIC interpreter that lets you 
script your Macintosh without AppleScript. The 
interpreter includes advanced programming constructs: 
repeat loops, if/then/else conditionals, subroutine calls, 
etc... CLImate implements wildcard characters, enabling 
you to work on groups of files. Use CLImate instead of 
MPW to manage your projects. CLimate is an application 
occupying 70K disk space. It comes bundled with sample 
programs and full documentation. $59.95 


CMaster 2.0 by Jersey Scientific installs into THINK C 
5 /6/7 and Symantec C++ for Macintosh, and enhances 
the editor. Use its function popup to select a function and 
CMaster takes you right to it. Other features include 
multiple clipboards and markers, a Function Prototyper, 
and a GoBack Menu which can take you back to previous 
editing contexts. Almost all features bindable to the 
keyboard, along over a hundred keyboard-only features 
like “Add New Automatic Variable.” Glossaries, 
AppleScript and ToolServer support, Macros, and External 
Tools you create too! $129.95 


Cron Manager by Orchard Software implements the 
UNIX Cron facility. It can open any Macintosh file on a 
given date and time. By creating an alias, renaming it to 
the date and time to open, and moving it into the special 
Cron Events Folder, Cron Manager will open it. Cron 
Manager is a control panel that creates the special Cron 


Events Folder inside your System Folder. It is completely - 


transparent to the user. It works like the Startup Items 
folder, only smarter. It works with any Macintosh file: if 
you can double-click to start it, Cron Manager can open 
it. $26.95. Cron Manager bundled with CLImate, $59.95 


Dialog Maker by Electric Software Corporation. 
Migrating from C to C++? Dialog Maker can ease your 
transition. Dialog Maker is an object-oriented programming 
library for MPW C++ and Symantec C++ (MPW and 
Symantec Development Environment versions) which 
contains a complete set of routines that create a high level 
interface to dialogs. Dialog Maker provides a small number 
of simple, yet powerful routines to access and manipulate 
dialogs. Resources are used to control the most common 
dialog behavior allowing you to develop your application 
lightning fast. Minimum requirements System 7.0, MPW 
3.2, MPW C++ 3.2, or Symantec C++ 6.0. $149 


dtF is a true relational database system for Apple 
Macintosh computers. dtF provides a powerful choice for 
developers who want to create database centered 
applications with no performance trade-offs. dtF features 
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SQL, full transaction control, error recovery, single user, 
Client server architecture and multi-platform support 
including DOS, Windows, 0S/2 and UNIX. The C/C++ API 
is identical and fully portable cross all supported 
platforms. Third-party vendors supporting dtF will be able 
to offer a variety of advanced features and benefits to their 
customers royalty free. Tools are included for importing, 
exporting, creating and managing databases and users. 
Supported development environments include: Symantec, 
MPW, MetroWerks and more. Mac/SDK: $695 


InstallerPack™ by StepUp Software is a package of 
several Installer “atoms” that let developers incorporate 
graphics, sounds, file compression and custom folder 
icons into installation scripts. Compression formats 
supported are Compact Pro & Diamond. Each atom also 
available separately: $219 


Last Resort Programmer’s Edition records 
every keystroke, command key and mouse event (in local 
coordinates) to a file on your hard disk. This is especially 
useful for program testing & debugging, and for technical 
support and help desks. If something goes wrong 
(because of a power failure, system crash, forgetting to 
Save or deleting lines) and you lose a word, phrase, or 
document you can look in the Last Resort keystroke file 
and recover what you typed. Last Resort is also useful for 
technical support personnel, when they have to ask “What 
was the last thing you did before...?” $74.95 


LJ Profiler by Lars Jordebo Datakonsult supports 
profiling of C++ 68K and Power PC applications compiled 
with Code Warrior, CFront or SCpp. Based on active 
profiling, i.e. profiling code called at function enter and 
exit, the browser application lets you follow call chain 
timings in hierarchical views or separate windows. 
Collect, organize, compare and save profiling data from 
different versions of your application into a project. 
Scriptable and recordable with full access to most internal 
data structures. Optional remote profiling and tracking of 
segment and stack usage. Full Source code to what you 
link into your application. $295. 


LS Object Pascal CD includes the world’s first Object 
Pascal compiler for Power Macintosh. 100% compatible 
with Apple’s MPW Pascal, LS Object Pascal combines the 
best of Apple’s native development tools with innovative new 
technology developed at Language Systems. Compiler 
options specify 68K or native PowerPC code generation. 
Included on the CD are: LS Object Pascal compiler, 
Universal Pascal Toolbox interfaces, fully loaded MPW 
3.3.1, 68K and PowerPC source debuggers, PowerPC 
assembler, online documentation, Macintosh Tech Notes, 
and a special version of AppMaker by Bowers Development 
that generates native Pascal source code. The beta release 
includes upgrades to v1.0 when it becomes available. $399 


Spellswell 7 1.0.4 is an award-winning, 
comprehensive, practical spelling checker that works in 
batch mode or within applications that incorporate the 
Apple Events Word Services protocol (e.g., Eudora, 
WordPerfect, Communicate!, and Fair Witness). 
Spellswell 7 checks for spelling errors as well as common 
typos like capitalization errors, spaces before punctuation, 
double double word errors, abbreviation errors, mixed 
case errors, extra spaces between words, a/an before 
vowel/consonant, etc... MacTech orders include developer 
kit with Writeswell Jr., a Sample Apple Events Word 
Services word-processor and its source code. $74.95 


MacAnalyst by Exce! Software supports software 
engineering methods including structured analysis, data 
modeling, screen prototyping, object-oriented analysis, 
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and data dictionary. This language independent tool is 
used by system analysts and software designers. Demo 
$79, Product $995 


MacAnalyst/Expert by Excel Software supports 
software engineering methods with the capabilities of 
MacAnalyst plus state transition diagrams, state transition 
tables, decision tables and process activation tables. An 
integrated requirement database provides traceability from 
requirement statements to analysis or design diagrams, 
code or test procedures. This tool is well suited to the 
analysis and design of real-time or requirements driven 
projects. Demo $79, Product $1595 


MacDesigner by Excel Software supports software 
engineering methods including structured design, object- 
oriented design, data dictionary and code browsing. This 
tool is well suited to detailed design or maintenance of 
software development projects. Demo $79, Product $995 


MacDesigner/Expert by Excel Software supports 
software engineering methods with the capabilities of 
MacDesigner plus multi-task design. An integrated 
requirement database provides traceability from requirement 
Statements to design diagrams, code or test procedures. 
This tool is well suited to design or maintenance of real-time, 
multi-tasking software projects. Demo $79, Product $1595 


MacA&D by Excel Software combines the capabilities of 
MacAnalyst/Expert and MacDesigner/Expert into a single 
application. It supports structured analysis and design, 
object-oriented analysis and design, real-time extensions, 
task design, data modeling, screen prototyping, code editing 
and browsing, reengineering, requirement traceability, and a 
global data dictionary. Demo $149, Product $2995 


MacWireFrame by Amplified 
Intelligence. Create your own virtual reality 
application with MacWireFrame, a virtual 


reality application frame work. Includes a 
complete library of object oriented graphics routines, its 
own easy to understand application frame work (similar to 
MacApp or TCL but a lot easier to understand), plus an 
example application program that lets you start solid 
modeling right away. Comes complete with fully 
documented source code. All new purchases will be 
guaranteed a $49.99 upgrade to the soon to be released, 
scriptable, MacWireFrame 5.0. Due to the overwhelming 
response the special price offer has been extended for a 
little while longer. Special Offer: $299-60 $75!!!! 


McCLint™ Rev. 2.2 by MMCAD. McCLint locates 
questionable C programming constructs, saving you hours 
by identifying programming mistakes and latent 
programming bugs. Some of the checks include variable 
type usage, conditional and assignment statement usage, 
arithmetic operations in conditional expressions, misplaced 
semicolons, pointer type coercion, function argument 
passing (with and without function prototypes), local and 
global variable initialization and usage, and existence/shape 
of return statements. McCLint includes a THINK C like, 
multiple window editor and source code highlighting system 
in a fully integrated environment. One or more files can be 
analyzed in an interactive or batch fashion. Works with 
THINK C (including OOPS), MPW C.... $149.95 


McCPrint™ Rev 2.2 by MMCAD. McCPrint 
reformats and beautifies C and C++ source code in a user 
specified manner. You can transform code to and from 
your programming style, making source code easier to 
read and work with. In addition to code formatting, 
documentation support aids include source code 
pagination, line number inclusion and control flow 
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graphing. McCPrint includes a multiple window editor 
and source code highlighting system in a fully integrated 
environment. Works with THINK C, MPW C/C++, 
supports System 7 and 32 bit addressing for use on any 
system including the Quadras. $99.95 


The Memory Mine™ by Adianta is a stand alone 
debugging tool for Macintosh and native PowerPC. 
Programmers can monitor heaps, identify problems such 
as memory leaks, and stress test applications. Active status 
of memory in a heap is sampled on the fly: allocation in 
non-relocatable (Ptr), relocatable (Handle) and free space is 
shown, as are heap corruption, fragmentation, and more... 
Allocate, Purge, Compact, and Zap memory let users stress 
test all or part of a program. Source code is not needed to 
view heaps. It works on Macintoshes with 68020 or later 
and System 7.0 or later. $99 


p1 Modula-2 V5.1 is a full implementation 
of the ISO Standard for Modula-2 which includes 
exception handling, termination, complex numbers, value 
constructors, a standard library and more. In addition it 
Supports objects and MacApp, foreign language calls, all 
current MPW interfaces, optimized 680x0 instructions, 
three floating point types with four modes of operation, etc. 
A symbolic window debugger, several utilities and a set of 
examples (including MacApp tutorial) are included. p1 
Modula-2 requires MPW. It is targeted for professional 
development and prompt technical support by e-mail or 
FAX is granted. $395, corporate 5 pack $1175 


NEW! PictureCDEF 1.3 by Paradigm Software is 
a professional-level CDEF for creating custom 
graphical buttons (8-64 pixels). PictureCDEF is used in 
products by Adobe, ProVue, STF Technologies and others. 
It is multi-monitor and bit-depth sensitive. The button 
graphic (cicn, ResEdit) can be changed at runtime and 
even animated with a call-back routine. Create distinct 
buttons in seven variations: MultiState, PushButton, 
FlexiButton, ToggleButton, ChkButton, PushPictButton and 
TogglePictButton. Position the optional button title at left, 
bottom or right, or ollow the system text direction for 
international support. Manual, 
sample code and MacApp 3.0 
support included. Full source code: 
$95.00 Object code: $45.00. 


Qd3d/3dPane/SmartPane source code bundle by 
Vivistar Consulting. Qd3d 2.0: Full featured 3d 
graphics. Points; lines; polygons; polyhedra; Gouraud 
Shading; Z-buffering; culling; depth cueing; parallel, 
perspective, and stereoscopic projections; performance 
enhancing “OnlyQD” and “Wireframe” modes; full 
Clipping; pipeline access; animation and model 
interaction support; and a “triad mouse” to map 2d mouse 
movement to 3d. 3dPane 2.0: Integrates Qd3d with 
the TCL and provides a view orientation controller. 
SmartPane: Offscreen image buffering, flicker free 
animation, and QuickTime movie recording. For use with 
Qd3d/3dPane or in 2d settings. All work with C++ 
compilers or ThinkC 6. $192 


NEW! QC™ by Onyx Technology, is a system 


extension that stress tests code during runtime 
for common and not-so-common errors. Tests include 
heap checks, purges, scrambles, handle/pointer 
validation, dispose/release checks, write to zero, de- 
reference zero as well as other tests like free memory 
invalidation and block bounds checking. QC is 
extremely user friendly for the non-technical tester yet 
Offers an API for programmers who want precise control 
over testing. $99 





NEW! QUED/M 2.7 by Nisus Software, is a 
programmer's text editor which has defined the 
industry standard for speed and efficiency. With integrated 
support for Symantec C/C++, Metrowerks CodeWarrior, 
and MPW, QUED/M offers unrivaled usefulness for the 
Macintosh developer. In addition to supporting all the 
major development environments on the Macintosh, 
QUED/M offers dozens of powerful editing features, 
including unlimited undo and redo, UNIX style GREP 
searching, macro language, scripting, text folding, text 
sorting, file comparison and merging, Toolbox lookup, 
ten editable/appendable clipboards, line numbering, 
markers, displaying text as ASCII codes, vertical and 
horizontal screen splitting, plus much more. 


$149ScriptGen Pro™ by StepUp Software is an 
Installer script generator which requires no programming 
or knowledge of Rez. Supports StepUp’s InstallerPack, 
Stufflt compression, custom packages, splash screens, 
network installs, Rez code output, importing resources, 
and AppleEvent link w/MPW: $169 


SoftPolish by Language Systems is a development 
tool that helps software developers avoid embarrassing 
spelling errors, detect incorrect or incompatible resources 
and improve the appearance of their Macintosh software. 
SoftPolish examines application resources and reports 
potential problems to a scrolling log. Independent of any 
programming language or environment, SoftPolish 
improves the quality of any Macintosh program. $169 


NEW! Spyer by InCider is a simple operated tool 
that records all actions (including mouse 


movement) you perform on a Macintosh computer and 
then replays them at your preferred speed. The recorded 
data can be saved in files for future use. Spyer works as a 
background process with any Macintosh application and 
is triggered by user defined Hot Keys. Spyer enables the 
"Continuous Redo" utility and is especially useful for 
software testing and demonstration. $39 


StoneTable: A library replacing all functions found in 
list manager plus: variable size columns/rows: different 
font, size, style, forecolor, backcolor per cell: sort, resize, 
move, copy, hide columns/rows; edit cells/titles in place; 
titles for columns/rows; multiple lines per cell; grid line 
pattern/color; greater than 32k data per table: up to 32k 
text per cell; support for balloon help and binary cell data. 
Versions for Think C, Think Pascal, MPW C, MPW 
Pascal, CodeWarrior C. (all prices per developer) $150 
first compiler, additional compilers $50 


Stone Table Extra: Additional functions for 
StoneTable. Drag selected cells within table or to other 
tables; optionally add rows as part of drag; popup menus 
or check boxes in cells; variable width grid lines: 
move/drag/resize table in window; clipboard operations 
on multiple cells. Requires StoneTable. (all prices per 
developer) $50 first compiler, additional compilers $25 


StoneTable and StoneTableExtra for 

PowerPC: Same functionality as 68K 
libraries. Versions for MPW C and CodeWarrior C. Must 
have 68K libraries. (all prices per developer) StoneTable 
$100, StoneTableExtra $25 


ViperBase by Viper Development is a fast database 
designed for developers that want speed but don't want to 
spend months or years developing a commercial quality 
database. ViperBase: Unlimited Records, Variable Length: 
$59. ViperBase ||: ViperBase + Multiple Indices. $119 
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KEEPING THE PorTS STRAIGHT 


Saving and restoring the GrafPort is something that must be 

done a lot. Suppose you needed to convert a Point to Local 

coordinates. You first have to set the GrafPort to the window who's 
coordinates you want. It might look like this: 


void foo(WindowPtr myWindow, Point *thePoint) [ 
GrafPrt savedPort; // declare a temporary variable 
GetPort (&savedPort) ; // remember the old port 
SetPort (myWindow) ; // point to the right window 
GlobalToLocal(thePoint);  //do the work 
SetPort(savedPort) ; // restore the old port 

} 


Here’s a nifty C++ class to simplify things. Put it all in one header file, PortSaver.h: 


class PortSaver { 
public: 
Por saver(GrafPtr newPort = nil); 
virtual ~PortSaver(void) ; 
private: 
GrafPtr savedPort; 
inline PortSaver::PortSaver(GrafPtr newPort) { 
GetPort(&savedPort); //remember the old port 
if (newPort != nil) 
SetPort(newPort);  //set the new port 
y 
j 
inline PortSaver::~PortSaver(void) { 
if (savedPort != nil) //ifthere is an old port 
SetPort(savedPort); //restore it 
} 
// A macro that makes the PortSaver easier to use 
#tdefine SETPORT(aPort) PortSaver setTheCurrentPortTo(aPort) 


Here is the same routine using class PortSaver 
void foo(WindowPtr myWindow, Point *thePoint) { 
SETPORT (myWindow) ; // point to the right window 
GlobalToLocal(thePoint); //do the work 


y 
J 


Advantages: 

1) Saves typing. Actually, class PortSaver does more sanity checking than the simple example above. 
2) The port is always restored when the function exits, no matter how many return points there 
might be, and even if an exception gets thrown. 


Disadvantages 

Even though I’ve written PortSaver with inline functions, there is no guarantee that any given 
compiler will actually inline them. As a result, you might get additional overhead from the function 
calls, and a call to LoadSeg (depending on where the compiler actually put the function code.) 


You can adapt PortSaver to save other things as well. Whenever you want to 
temporarily change one of the global Quickdraw properties (text font, window 
origin, etc.), you can implement a PortSaver-like class. : 

— James Jennings, jennings@halcyon.com 
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But you'll never know if you 
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_ for Tip of the Month, which 

| scores twice as much. You can 


~ take your award in orders, 
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Make sure your code com yles 
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OK, EVERYBODY, GET IN LINE! 


The review of Object Master 2.5 in the 
December issue was a welcome insight 
into a powerful programming tool. On 
page 65, Andy Dent observes that Object 
Master allows both color- and style-coding 
of source files, and points out that this 
feature is a “contentious issue.” Andy is 
probably referring to the fact that “styling” 
code often results in defeating the 
uniformity of text width in mono spaced 
fonts that most programmers rely on to 
align code vertically. 

I've used Object Master, and found 
that you can have code styled and mono 
spaced by using the “condensed” style in 
conjunction with “bold” or “outline” style. 
Italics and plain text characters are then 
the same width as bold or outlined 
characters. As a result, code text is 
dramatically clearer when read with a 
styled editor like Object Master, but loses 
none of it’s structure when read by an 
editor that doesn’t support styled text. 


— Nick, nick+@pitt.edu 


MACTECHMAGAZINE © FEBRUARY 1995 


















Agents Object System (AO/S): 
Delivering Component-based Technology 


Based on industry- 
proven Smalltalk language 


Smalltalk is the pure Object-Oriented (OO) language 
which defined the OOP concept, and is now the cor- 






























components built on the Agents Object System” 
(AO/S™). The AO/S Component Toolbox” is a 


portable layer of abstraction between AO/S 


Components and host system services. The AO/S porate language of choice for new business applica- 


delivers a user extensible home/container that trans- tions and sophisticated client/server systems. 


arently wrappers a variety of component technolo- 
gies including OpenDoc, OLE, and OSA Scripting. 


What this means to you! 
SmalltalkAgents Professional, built on the unique. 
AO/S architecture, is a modern, innovative new 


AO/S: Core Technologies 


The AO/S Core Technologies include rich intelligent development system that blends the best of 


component-based architecture with the best in 
object-oriented development technologies. 








What the press and customers say: 


«'.. the most unique and innovative 




















threads enabling both tethered development and 
robust “memory protected” application 

deployment, and a shareable object system, all of 
which makes it ideal for high-performance client and 


Smalltalk development environment...” 
Object Magazine, October 1994 





“I must say, this is NOT the Smalltalk of several years 
ago, and I AM TRULY IMPRESSED WITH WHAT YOU 
HAVE ACCOMPLISHED!” 

ES. Taylor, Independent Consultant, New York, NY 


server applications. 
Scalability 

Unlike other” application builders”, the AO/S Product 
Family (including SmalltalkAgents Professional and | 
VisualAgents) allows you to go from user-level script- 
ing to full professional-level system development and 
back. SmalltalkAgents is scalable, from the creation 
ications to sophisticated an 
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" “SmalltalkAgents has been my favorite Smalltalk envi-_ 
~ ronment and I believe it represents the best chance 
Smalltalk has of becoming an accepted grass roots 





anguage for developers.” 
David Scott, General Atomics, 





of small and simple app 
complex multi-user systems. - 
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or 301-530-4853 (info@qks.com) 
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